perm filename SOPT.PCO[S1,ALS]1 blob
sn#404080 filedate 1978-12-20 generic text, type T, neo UTF8
SST P $MAINBLK 1 0 0 41504 0
SST P ERREX002 2 4 0 0 4
LOC 0
BGN 0,1,1
ERREX002 ENT P,2,L1 ERREXIT 1 1 1
LDA 1,13
CSP SIO
LCA '**** ERREXIT CALLED WITH CODE ='
LDC I,31
LDC I,31
CSP WRS
LOD I,2,8
LDC I,12
CSP WRI
LOC 10
CSP WLN
CSP EIO
LDC I,4097
CSP XIT
RET P
L1 DEF 12
SST P ASSER003 2 4 12 0 4
LOC 0
ASSER003 ENT P,2,L1 ASSERTFAIL 1 1 1
LDA 2,12
LOD A,2,8
MOV 12
LOD I,1,308
LDC I,1
ADI
STR I,1,308
LDA 1,13
CSP SIO
LOC 10
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA '***** ERROR ***** ASSERTION #'
LDC I,30
LOC 20
LDC I,30
CSP WRS
LOD I,1,308
LDC I,6
CSP WRI
LCA ' FAILED : '
LDC I,11
LDC I,11
CSP WRS
LDA 2,12
LOC 30
LDC I,12
LDC I,12
CSP WRS
LCA ' *****'
LDC I,7
LDC I,7
CSP WRS
CSP WLN
CSP EIO
LOD I,1,308
LOC 40
LOD I,1,308
LOD I,1,308
SBI
DVI
STR I,1,308
MST 2,4,4
LDC I,9999
PAR I
CUP P,2,ERREX002
RET P
L1 DEF 24
SST P ASSER004 2 8 12 0 8
LOC 0
ASSER004 ENT P,2,L1 ASSERT 1 1 1
LDA 2,16
LOD A,2,8
MOV 12
LOD I,1,308
LDC I,1
ADI
STR I,1,308
LOD B,2,12
FJP L2
LOC 10
UJP L3
L2 LAB
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
LOC 20
CSP SIO
LCA '***** ERROR ***** ASSERTION #'
LDC I,30
LDC I,30
CSP WRS
LOD I,1,308
LDC I,6
CSP WRI
LCA ' FAILED : '
LDC I,11
LOC 30
LDC I,11
CSP WRS
LDA 2,16
LDC I,12
LDC I,12
CSP WRS
LCA ' *****'
LDC I,7
LDC I,7
CSP WRS
LOC 40
CSP WLN
CSP EIO
LOD I,1,308
LOD I,1,308
LOD I,1,308
SBI
DVI
STR I,1,308
MST 2,4,4
LDC I,9999
LOC 50
PAR I
CUP P,2,ERREX002
L3 LAB
RET P
L1 DEF 28
SST P ERROR005 2 4 0 0 4
LOC 0
ERROR005 ENT P,2,L1 ERROR 1 1 1
LOD I,1,40364
LDC I,1
ADI
CHK I,0,34359738367
STR I,1,40364
LDA 1,13
CSP SIO
LCA ' *ERROR* '
LDC I,10
LOC 10
LDC I,10
CSP WRS
CSP EIO
LOD I,2,8
ORD
CHK I,0,68
XJP L2
L6 LAB
LDA 1,13
CSP SIO
LCA 'ABR OR NGR APPLIED TO NON-REAL'
LOC 20
LDC I,30
LDC I,30
CSP WRS
CSP WLN
CSP EIO
UJP L5
L7 LAB
LDA 1,13
CSP SIO
LCA 'FIXED-UP ADDRESS EXCEEDS 30-BIT S1 ADDRESS SPACE'
LDC I,48
LOC 30
LDC I,48
CSP WRS
CSP WLN
CSP EIO
UJP L5
L8 LAB
LDA 1,13
CSP SIO
LCA 'CHK TYPE A APPLIED TO NON-ADDRESS'
LDC I,33
LDC I,33
LOC 40
CSP WRS
CSP WLN
CSP EIO
UJP L5
L9 LAB
LDA 1,13
CSP SIO
LCA 'ALIGNMENT ERROR'
LDC I,15
LDC I,15
CSP WRS
LOC 50
CSP WLN
CSP EIO
UJP L5
L10 LAB
LDA 1,13
CSP SIO
LCA 'AND OR IOR APPLIED TO NON-BOOLEAN'
LDC I,33
LDC I,33
CSP WRS
CSP WLN
LOC 60
CSP EIO
UJP L5
L11 LAB
LDA 1,13
CSP SIO
LCA 'INVALID OR CONFLICTING OPERAND TYPES FOR BINARY OPERATION'
LDC I,57
LDC I,57
CSP WRS
CSP WLN
CSP EIO
LOC 70
UJP L5
L12 LAB
LDA 1,13
CSP SIO
LCA 'CHK CONSTANT OPERAND OUT OF SPECIFIED RANGE'
LDC I,43
LDC I,43
CSP WRS
CSP WLN
CSP EIO
UJP L5
L13 LAB
LOC 80
LDA 1,13
CSP SIO
LCA 'CHK APPLIED TO INVALID OPERAND TYPE'
LDC I,35
LDC I,35
CSP WRS
CSP WLN
CSP EIO
UJP L5
L14 LAB
LDA 1,13
LOC 90
CSP SIO
LCA 'CHR APPLIED TO NON-INTEGER'
LDC I,26
LDC I,26
CSP WRS
CSP WLN
CSP EIO
UJP L5
L15 LAB
LDA 1,13
CSP SIO
LOC 100
LCA 'INVALID TYPE COERCION'
LDC I,21
LDC I,21
CSP WRS
CSP WLN
CSP EIO
UJP L5
L16 LAB
LDA 1,13
CSP SIO
LCA 'INVALID OR CONFLICTING OPERAND TYPES FOR COMPARE OPERATION'
LOC 110
LDC I,58
LDC I,58
CSP WRS
CSP WLN
CSP EIO
UJP L5
L17 LAB
LDA 1,13
CSP SIO
LCA 'COMPARE TYPE M APPLIED TO NON-ADDRESS'
LDC I,37
LOC 120
LDC I,37
CSP WRS
CSP WLN
CSP EIO
UJP L5
L18 LAB
LDA 1,13
CSP SIO
LCA 'FIXED-UP DISPLACEMENT EXCEEDS 25 BIT S1 LIMIT'
LDC I,45
LDC I,45
LOC 130
CSP WRS
CSP WLN
CSP EIO
UJP L5
L19 LAB
LDA 1,13
CSP SIO
LCA 'EXPRESSION TOO COMPLEX (OR TOTAL PROC NESTING TOO DEEP)'
LDC I,55
LDC I,55
CSP WRS
LOC 140
CSP WLN
CSP EIO
UJP L5
L20 LAB
LDA 1,13
CSP SIO
LCA 'STACK TOP MUST BE FILE ADDRESS'
LDC I,30
LDC I,30
CSP WRS
CSP WLN
LOC 150
CSP EIO
UJP L5
L21 LAB
LDA 1,13
CSP SIO
LCA 'FJP WITH NON-BOOLEAN STACK TOP'
LDC I,30
LDC I,30
CSP WRS
CSP WLN
CSP EIO
LOC 160
UJP L5
L22 LAB
LDA 1,13
CSP SIO
LCA 'FJP WITH NON-SINGLETON EXPR STACK'
LDC I,33
LDC I,33
CSP WRS
CSP WLN
CSP EIO
UJP L5
L23 LAB
LOC 170
LDA 1,13
CSP SIO
LCA 'FLO OR FLT APPLIED TO INVALID OPERAND TYPE'
LDC I,42
LDC I,42
CSP WRS
CSP WLN
CSP EIO
UJP L5
L24 LAB
LDA 1,13
LOC 180
CSP SIO
LCA 'FUNCTION CALLS NESTED TOO DEEPLY IN EXPRESSION'
LDC I,46
LDC I,46
CSP WRS
CSP WLN
CSP EIO
UJP L5
L25 LAB
LDA 1,13
CSP SIO
LOC 190
LCA 'INCOMPATIBLE TYPES FOR STORING'
LDC I,30
LDC I,30
CSP WRS
CSP WLN
CSP EIO
UJP L5
L26 LAB
LDA 1,13
CSP SIO
LCA 'IND ON (SHIFTED) INDEX WITHOUT BASE'
LOC 200
LDC I,35
LDC I,35
CSP WRS
CSP WLN
CSP EIO
UJP L5
L27 LAB
LDA 1,13
CSP SIO
LCA 'INDEXING WITHIN FAST (REGISTER) PARAMETER AREA'
LDC I,46
LOC 210
LDC I,46
CSP WRS
CSP WLN
CSP EIO
UJP L5
L28 LAB
LDA 1,13
CSP SIO
LCA 'INN ON NON-SET SECOND OPERAND'
LDC I,29
LDC I,29
LOC 220
CSP WRS
CSP WLN
CSP EIO
UJP L5
L29 LAB
LDA 1,13
CSP SIO
LCA 'TYPE IN P-CODE COMMAND DIFFERENT'
LDC I,32
LDC I,32
CSP WRS
LOC 230
LCA ' FROM TYPE OF STACK TOP.'
LDC I,24
LDC I,24
CSP WRS
CSP WLN
CSP EIO
UJP L5
L30 LAB
LDA 1,13
CSP SIO
LCA 'CUP WITH INSUFFICIENT PARAMETERS ON STACK'
LOC 240
LDC I,41
LDC I,41
CSP WRS
CSP WLN
CSP EIO
UJP L5
L31 LAB
LDA 1,13
CSP SIO
LCA 'DVI OR MOD BY INTEGER CONSTANT ZERO'
LDC I,35
LOC 250
LDC I,35
CSP WRS
CSP WLN
CSP EIO
UJP L5
L32 LAB
LDA 1,13
CSP SIO
LCA 'INVALID STANDARD PROCEDURE NAME'
LDC I,31
LDC I,31
LOC 260
CSP WRS
CSP WLN
CSP EIO
UJP L5
L33 LAB
LDA 1,13
CSP SIO
LCA 'INVALID P-CODE OPCODE'
LDC I,21
LDC I,21
CSP WRS
LOC 270
CSP WLN
CSP EIO
UJP L5
L34 LAB
LDA 1,13
CSP SIO
LCA 'INVALID TRACE ARGUMENT'
LDC I,22
LDC I,22
CSP WRS
CSP WLN
LOC 280
CSP EIO
UJP L5
L35 LAB
LDA 1,13
CSP SIO
LCA 'LDC TYPE ARGUMENT INVALID'
LDC I,25
LDC I,25
CSP WRS
CSP WLN
CSP EIO
LOC 290
UJP L5
L36 LAB
LDA 1,13
CSP SIO
LCA 'FIXED-UP DISPLACEMENT EXCEEDS 25 BIT S1 LIMIT'
LDC I,45
LDC I,45
CSP WRS
CSP WLN
CSP EIO
UJP L5
L37 LAB
LOC 300
LDA 1,13
CSP SIO
LCA 'INVALID IMPLICIT TYPE COERCION'
LDC I,30
LDC I,30
CSP WRS
CSP WLN
CSP EIO
UJP L5
L38 LAB
LDA 1,13
LOC 310
CSP SIO
LCA 'INVALID LEVEL IN P-CODE INSTRUCTION'
LDC I,35
LDC I,35
CSP WRS
CSP WLN
CSP EIO
UJP L5
L39 LAB
LDA 1,13
CSP SIO
LOC 320
LCA 'INVALID TYPE ON P-CODE INSTRUCTION'
LDC I,34
LDC I,34
CSP WRS
CSP WLN
CSP EIO
UJP L5
L40 LAB
LDA 1,13
CSP SIO
LCA 'IXA ON NON-ADDRESS FIRST OPERAND'
LOC 330
LDC I,32
LDC I,32
CSP WRS
CSP WLN
CSP EIO
UJP L5
L41 LAB
LDA 1,13
CSP SIO
LCA 'LAST SST PARAMETER BIGGER THAN MAXPAREG'
LDC I,39
LOC 340
LDC I,39
CSP WRS
CSP WLN
CSP EIO
UJP L5
L42 LAB
LDA 1,13
CSP SIO
LCA 'UNDEFINED LABEL : L'
LDC I,20
LDC I,20
LOC 350
CSP WRS
LOD I,1,332
MST 2,4,4
LOD I,1,332
PAR I
CUP I,2,FLDW0001
CSP WRI
CSP WLN
CSP EIO
UJP L5
L43 LAB
LOC 360
LDA 1,13
CSP SIO
LCA 'IND LOADING STRING (INDIRECT THRU STRING CONSTANT ILLEGAL)'
LDC I,58
LDC I,58
CSP WRS
CSP WLN
CSP EIO
UJP L5
L44 LAB
LDA 1,13
LOC 370
CSP SIO
LCA 'MOV WITH NON-ADDRESS OPERAND(S)'
LDC I,31
LDC I,31
CSP WRS
CSP WLN
CSP EIO
UJP L5
L45 LAB
LDA 1,13
CSP SIO
LOC 380
LCA 'MST SPECIFIED INSUFFICIENT PARAMETER STORAGE'
LDC I,44
LDC I,44
CSP WRS
CSP WLN
CSP EIO
UJP L5
L46 LAB
LDA 1,13
CSP SIO
LCA 'MST WITHOUT CORRESPONDING CUP IN LAST SEGMENT'
LOC 390
LDC I,45
LDC I,45
CSP WRS
CSP WLN
CSP EIO
UJP L5
L47 LAB
LDA 1,13
CSP SIO
LCA 'MULTIPLY DEFINED LABEL'
LDC I,22
LOC 400
LDC I,22
CSP WRS
CSP WLN
CSP EIO
UJP L5
L48 LAB
LDA 1,13
CSP SIO
LCA 'TOTAL PROC NESTING TOO DEEP (OR SOME EXPR TOO COMPLEX)'
LDC I,54
LDC I,54
LOC 410
CSP WRS
CSP WLN
CSP EIO
UJP L5
L49 LAB
LDA 1,13
CSP SIO
LCA 'NEW OPERANDS NOT (1) ADDRESS AND (2) INTEGER'
LDC I,44
LDC I,44
CSP WRS
LOC 420
CSP WLN
CSP EIO
UJP L5
L50 LAB
LDA 1,13
CSP SIO
LCA 'IND APPLIED TO NON-ADDRESS TYPE'
LDC I,31
LDC I,31
CSP WRS
CSP WLN
LOC 430
CSP EIO
UJP L5
L51 LAB
LDA 1,13
CSP SIO
LCA 'INC, DEC, PRE, OR SUC APPLIED TO NON-DISCRETE TYPE'
LDC I,50
LDC I,50
CSP WRS
CSP WLN
CSP EIO
LOC 440
UJP L5
L52 LAB
LDA 1,13
CSP SIO
LCA 'NOT APPLIED TO NON-BOOLEAN'
LDC I,26
LDC I,26
CSP WRS
CSP WLN
CSP EIO
UJP L5
L53 LAB
LOC 450
LDA 1,13
CSP SIO
LCA 'IND APPLIED TO NIL'
LDC I,18
LDC I,18
CSP WRS
CSP WLN
CSP EIO
UJP L5
L54 LAB
LDA 1,13
LOC 460
CSP SIO
LCA 'ODD APPLIED TO NON-INTEGER'
LDC I,26
LDC I,26
CSP WRS
CSP WLN
CSP EIO
UJP L5
L55 LAB
LDA 1,13
CSP SIO
LOC 470
LCA 'ORD OPERAND NOT INTEGER, BOOLEAN, OR CHAR'
LDC I,41
LDC I,41
CSP WRS
CSP WLN
CSP EIO
UJP L5
L56 LAB
LDA 1,13
CSP SIO
LCA 'POP OF EMPTY EXPR STACK (STACK UNDERFLOW)'
LOC 480
LDC I,41
LDC I,41
CSP WRS
CSP WLN
CSP EIO
UJP L5
L57 LAB
LDA 1,13
CSP SIO
LCA 'DVR BY REAL CONSTANT ZERO'
LDC I,25
LOC 490
LDC I,25
CSP WRS
CSP WLN
CSP EIO
UJP L5
L58 LAB
LDA 1,13
CSP SIO
LCA 'MST SPECIFIED INSUFFICIENT REGISTER PARAMETER STORAGE'
LDC I,53
LDC I,53
LOC 500
CSP WRS
CSP WLN
CSP EIO
UJP L5
L59 LAB
LDA 1,13
CSP SIO
LCA 'RST OPERAND NOT ADDRESS'
LDC I,23
LDC I,23
CSP WRS
LOC 510
CSP WLN
CSP EIO
UJP L5
L60 LAB
LDA 1,13
CSP SIO
LCA 'SAV OPERAND NOT ADDRESS'
LDC I,23
LDC I,23
CSP WRS
CSP WLN
LOC 520
CSP EIO
UJP L5
L61 LAB
LDA 1,13
CSP SIO
LCA 'SET OPERATION APPLIED TO NON-SET'
LDC I,32
LDC I,32
CSP WRS
CSP WLN
CSP EIO
LOC 530
UJP L5
L62 LAB
LDA 1,13
CSP SIO
LCA 'SGS OR INN (FIRST) OPERAND NOT INTEGER, BOOLEAN, OR CHAR'
LDC I,56
LDC I,56
CSP WRS
CSP WLN
CSP EIO
UJP L5
L63 LAB
LOC 540
LDA 1,13
CSP SIO
LCA 'SIO DIDNT SEE FILE ADDR'
LDC I,23
LDC I,23
CSP WRS
CSP WLN
CSP EIO
UJP L5
L64 LAB
LDA 1,13
LOC 550
CSP SIO
LCA 'SIO OPERAND NOT ADDRESS'
LDC I,23
LDC I,23
CSP WRS
CSP WLN
CSP EIO
UJP L5
L65 LAB
LDA 1,13
CSP SIO
LOC 560
LCA 'SQI OR SQR OPERAND TYPE INVALID'
LDC I,31
LDC I,31
CSP WRS
CSP WLN
CSP EIO
UJP L5
L66 LAB
LDA 1,13
CSP SIO
LCA 'SST AND ENT INCONSISTENT'
LOC 570
LDC I,24
LDC I,24
CSP WRS
CSP WLN
CSP EIO
UJP L5
L67 LAB
LDA 1,13
CSP SIO
LCA 'SST AND RET INCONSISTENT'
LDC I,24
LOC 580
LDC I,24
CSP WRS
CSP WLN
CSP EIO
UJP L5
L68 LAB
LDA 1,13
CSP SIO
LCA 'EXPR STACK LEFT NONEMPTY IN LAST SEGMENT'
LDC I,40
LDC I,40
LOC 590
CSP WRS
CSP WLN
CSP EIO
UJP L5
L69 LAB
LDA 1,13
CSP SIO
LCA 'EXPRESSION STACK SHOULD HAVE BEEN '
LDC I,34
LDC I,34
CSP WRS
LOC 600
LCA 'EMPTY AFTER LAST INSTRUCTION'
LDC I,28
LDC I,28
CSP WRS
CSP WLN
CSP EIO
UJP L5
L70 LAB
LDA 1,13
CSP SIO
LCA 'EXPRESSION STACK SHOULD HAVE '
LOC 610
LDC I,29
LDC I,29
CSP WRS
LCA 'CONTAINED EXACTLY ONE ELEMENT '
LDC I,30
LDC I,30
CSP WRS
LCA 'AFTER LAST INSTRUCTION'
LDC I,22
LDC I,22
LOC 620
CSP WRS
CSP WLN
CSP EIO
UJP L5
L71 LAB
LDA 1,13
CSP SIO
LCA 'TRC OPERAND TYPE INVALID'
LDC I,24
LDC I,24
CSP WRS
LOC 630
CSP WLN
CSP EIO
UJP L5
L72 LAB
LDA 1,13
CSP SIO
LCA 'UJP WITH NONEMPTY EXPR STACK'
LDC I,28
LDC I,28
CSP WRS
CSP WLN
LOC 640
CSP EIO
UJP L5
L73 LAB
LDA 1,13
CSP SIO
LCA 'WRONG COMPARE OPERATOR FOR GIVEN OPERAND TYPES'
LDC I,46
LDC I,46
CSP WRS
CSP WLN
CSP EIO
LOC 650
UJP L5
L74 LAB
LDA 1,13
CSP SIO
LCA 'XJP WITH NON-SINGLETON EXPR STACK'
LDC I,33
LDC I,33
CSP WRS
CSP WLN
CSP EIO
UJP L5
L2 DEF 0
L3 DEF 68
L4 LAB
LOC 660
UJP L6
UJP L7
UJP L8
UJP L9
UJP L10
UJP L11
UJP L12
UJP L13
UJP L14
UJP L15
LOC 670
UJP L16
UJP L17
UJP L18
UJP L19
UJP L20
UJP L21
UJP L22
UJP L23
UJP L24
UJP L25
LOC 680
UJP L26
UJP L27
UJP L28
UJP L29
UJP L30
UJP L31
UJP L32
UJP L33
UJP L34
UJP L35
LOC 690
UJP L36
UJP L37
UJP L38
UJP L39
UJP L40
UJP L42
UJP L41
UJP L43
UJP L44
UJP L45
LOC 700
UJP L46
UJP L47
UJP L48
UJP L49
UJP L50
UJP L51
UJP L52
UJP L53
UJP L54
UJP L55
LOC 710
UJP L56
UJP L57
UJP L58
UJP L59
UJP L60
UJP L61
UJP L62
UJP L63
UJP L64
UJP L65
LOC 720
UJP L66
UJP L67
UJP L68
UJP L69
UJP L70
UJP L71
UJP L72
UJP L73
UJP L74
L5 LAB
LDC B,0
LOC 730
NOT
FJP L75
MST 2,4,4
LCA 'ERROR 999'
PAR A
CUP P,2,ASSER003
L75 LAB
MST 2,4,4
LDC I,1000
PAR I
CUP P,2,ERREX002
LOC 740
RET P
L1 DEF 12
SST P PRINT010 2 8 0 8 8
LOC 0
PRINT010 ENT P,2,L1 PRINTSET 1 1 1
LDA 1,13
CSP SIO
LCA ' ['
LDC I,2
LDC I,2
CSP WRS
CSP EIO
LDC I,0
STR I,2,20
LOC 10
LDC I,0
CHK I,0,63
STR I,2,16
LDC I,63
CHK I,0,63
STR I,2,24
LOD I,2,16
LOD I,2,24
LEQ I
FJP L3
L2 LAB
LOC 20
LOD I,2,16
CHK S,0,63
LOD S,2,8
INN
FJP L4
LOD I,2,20
LDC I,20
GRT I
FJP L5
LDA 1,13
LOC 30
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA ' '
LDC I,17
LDC I,17
CSP WRS
CSP EIO
LOC 40
LDC I,0
STR I,2,20
L5 LAB
LDA 1,13
CSP SIO
LOD I,2,16
LDC I,3
CSP WRI
CSP EIO
LOD I,2,20
LDC I,1
LOC 50
ADI
STR I,2,20
L4 LAB
LOD I,2,16
LOD I,2,24
NEQ I
FJP L3
LOD I,2,16
INC I,1
CHK I,0,63
STR I,2,16
LOC 60
UJP L2
L3 LAB
LDA 1,13
CSP SIO
LCA '].'
LDC I,2
LDC I,2
CSP WRS
CSP WLN
CSP EIO
RET P
L1 DEF 28
SST P PRINT011 2 4 0 0 4
LOC 0
PRINT011 ENT P,2,L1 PRINTMEMOREG 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
FJP L2
LOD A,2,8
IND I,4
LDC I,4
EQU I
LOC 10
FJP L3
LDA 1,13
CSP SIO
LCA 'RTA'
LDC I,3
LDC I,3
CSP WRS
CSP EIO
UJP L4
L3 LAB
LOD A,2,8
LOC 20
IND I,4
LDC I,6
EQU I
FJP L5
LDA 1,13
CSP SIO
LCA 'RTB'
LDC I,3
LDC I,3
CSP WRS
LOC 30
CSP EIO
UJP L6
L5 LAB
LDA 1,13
CSP SIO
LDC C,'R'
LDC I,1
CSP WRC
LOD A,2,8
IND I,4
ORD
LOC 40
MST 2,4,4
LOD A,2,8
IND I,4
ORD
PAR I
CUP I,2,FLDW0001
CSP WRI
CSP EIO
L6 LAB
L4 LAB
UJP L7
L2 LAB
LOD A,2,8
LOC 50
IND I,8
LDC I,0
EQU I
FJP L8
LDA 1,13
CSP SIO
LOD A,2,8
IND I,4
MST 2,4,4
LOD A,2,8
LOC 60
IND I,4
PAR I
CUP I,2,FLDW0001
CSP WRI
CSP EIO
UJP L9
L8 LAB
LDA 1,13
CSP SIO
LCA '<L'
LDC I,2
LOC 70
LDC I,2
CSP WRS
LOD A,2,8
IND I,8
MST 2,4,4
LOD A,2,8
IND I,8
PAR I
CUP I,2,FLDW0001
CSP WRI
LOC 80
LDC C,','
LDC I,1
CSP WRC
LOD A,2,8
IND I,4
MST 2,4,4
LOD A,2,8
IND I,4
PAR I
CUP I,2,FLDW0001
LOC 90
CSP WRI
LDC C,'>'
LDC I,1
CSP WRC
CSP EIO
L9 LAB
L7 LAB
RET P
L1 DEF 12
SST P PRINT012 2 4 0 12 4
LOC 0
PRINT012 ENT P,2,L1 PRINTDATUM 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,24
LDA 1,13
CSP SIO
LCA ' STK['
LOC 10
LDC I,13
LDC I,13
CSP WRS
LOD I,2,8
MST 2,4,4
LOD I,2,8
PAR I
CUP I,2,FLDW0001
CSP WRI
LCA '] IS'
LOC 20
LDC I,4
LDC I,4
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA ' TYP'
LDC I,12
LDC I,12
LOC 30
CSP WRS
LDA 1,30724
LOD A,2,24
IND I,4
CHK J,0,15
IXA 1
IND C,0
LDC I,1
CSP WRC
LCA ' = '
LOC 40
LDC I,3
LDC I,3
CSP WRS
CSP EIO
LOD A,2,24
IND I,4
LDC I,13
EQU I
MST 2,4,4
LOD I,2,8
LOC 50
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
AND
FJP L2
LDA 1,13
CSP SIO
LOD A,2,24
IND R,52
LDC I,14
LOC 60
LDC I,0
CSP WRR
CSP WLN
CSP EIO
UJP L3
L2 LAB
LOD A,2,24
IND I,4
LDC I,7
EQU I
MST 2,4,4
LOC 70
LOD I,2,8
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
AND
FJP L4
MST 2,8,8
LOD A,2,24
IND S,44
PAR S
LOC 80
CUP P,2,PRINT010
UJP L5
L4 LAB
LOD A,2,24
IND I,4
LDC I,5
EQU I
LOD A,2,24
IND I,8
LDC I,1
EQU I
LOC 90
AND
FJP L6
LDA 1,13
CSP SIO
LCA 'BJUMP WITH'
LDC I,10
LDC I,10
CSP WRS
LOD A,2,24
IND I,12
LOC 100
LDC I,3
CSP WRI
LCA ' TRUE JUMPS AND'
LDC I,15
LDC I,15
CSP WRS
LOD A,2,24
IND I,24
LDC I,3
CSP WRI
LOC 110
LCA ' FALSE JUMPS.'
LDC I,13
LDC I,13
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA ' BJUMPON IS '
LDC I,20
LOC 120
LDC I,20
CSP WRS
CSP EIO
LOD A,2,24
IND B,40
FJP L7
LDA 1,13
CSP SIO
LCA 'TRUE'
LDC I,4
LOC 130
LDC I,4
CSP WRS
CSP EIO
UJP L8
L7 LAB
LDA 1,13
CSP SIO
LCA 'FALSE'
LDC I,5
LDC I,5
CSP WRS
LOC 140
CSP EIO
L8 LAB
LDA 1,13
CSP SIO
LCA ' AND FALL THRU SKIP IS'
LDC I,22
LDC I,22
CSP WRS
CSP WLN
CSP EIO
LDC I,0
LOC 150
STR I,2,20
MST 2,8,8
LDA 2,20
PAR A
LOD A,2,24
IND A,36
CHK A,-1,0
PAR A
CUP P,4,DISAS007
LOD A,2,24
LOC 160
IND A,20
CHK A,-1,0
STR A,2,12
LDC I,1
STR I,2,16
LOD A,2,24
IND I,12
STR I,2,28
LOD I,2,16
LOD I,2,28
LOC 170
LEQ I
FJP L10
L9 LAB
LOD A,2,12
LDC N
NEQ A
NOT
FJP L11
MST 2,4,4
LCA 'PRINTDATU001'
PAR A
LOC 180
CUP P,2,ASSER003
L11 LAB
MST 2,4,4
LOD A,2,12
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,12
LOD I,2,16
LOD I,2,28
LOC 190
NEQ I
FJP L10
LOD I,2,16
INC I,1
STR I,2,16
UJP L9
L10 LAB
LOD A,2,24
IND A,32
CHK A,-1,0
STR A,2,12
LOC 200
LDC I,1
STR I,2,16
LOD A,2,24
IND I,24
STR I,2,28
LOD I,2,16
LOD I,2,28
LEQ I
FJP L13
L12 LAB
LOD A,2,12
LOC 210
LDC N
NEQ A
NOT
FJP L14
MST 2,4,4
LCA 'PRINTDATU001'
PAR A
CUP P,2,ASSER003
L14 LAB
MST 2,4,4
LOD A,2,12
LOC 220
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,12
LOD I,2,16
LOD I,2,28
NEQ I
FJP L13
LOD I,2,16
LOC 230
INC I,1
STR I,2,16
UJP L12
L13 LAB
UJP L15
L6 LAB
LDA 1,13
CSP SIO
LOD A,2,24
IND I,56
ORD
LDC I,1
LOC 240
CSP WRI
LCA ': ('
LDC I,3
LDC I,3
CSP WRS
CSP EIO
MST 2,4,4
LOD A,2,24
INC A,60
PAR A
LOC 250
CUP P,2,PRINT011
LOD A,2,24
IND I,72
LDC I,0
GRT I
FJP L16
LDA 1,13
CSP SIO
LCA ', '
LDC I,2
LOC 260
LDC I,2
CSP WRS
LOD A,2,24
IND I,80
ORD
LDC I,1
CSP WRI
LCA ': ('
LDC I,3
LDC I,3
LOC 270
CSP WRS
CSP EIO
MST 2,4,4
LOD A,2,24
INC A,84
PAR A
CUP P,2,PRINT011
LDA 1,13
CSP SIO
LCA ')*'
LOC 280
LDC I,2
LDC I,2
CSP WRS
LDA 1,4864
LOD A,2,24
IND I,76
CHK J,0,34
IXA 4
IND I,0
LDC I,1
LOC 290
CSP WRI
CSP EIO
L16 LAB
LOD A,2,24
IND I,72
LDC I,2
EQU I
FJP L17
LDA 1,13
CSP SIO
LCA ', '
LOC 300
LDC I,2
LDC I,2
CSP WRS
LOD A,2,24
IND I,100
ORD
LDC I,1
CSP WRI
LCA ': ('
LDC I,3
LOC 310
LDC I,3
CSP WRS
CSP EIO
MST 2,4,4
LOD A,2,24
INC A,104
PAR A
CUP P,2,PRINT011
LDA 1,13
CSP SIO
LOC 320
LCA ')*'
LDC I,2
LDC I,2
CSP WRS
LDA 1,4864
LOD A,2,24
IND I,96
CHK J,0,34
IXA 4
IND I,0
LOC 330
LDC I,1
CSP WRI
CSP EIO
L17 LAB
LDA 1,13
CSP SIO
LCA ').'
LDC I,2
LDC I,2
CSP WRS
CSP WLN
LOC 340
CSP EIO
L15 LAB
L5 LAB
L3 LAB
LDA 1,13
CSP SIO
LCA ' CODE STARTS WITH THE INSTRUCTION '
LDC I,42
LDC I,42
CSP WRS
CSP EIO
LOD A,2,24
IND A,0
LOC 350
LOD A,1,328
EQU A
FJP L18
LDA 1,13
CSP SIO
LCA 'AT NEWINSTREC.'
LDC I,14
LDC I,14
CSP WRS
CSP WLN
LOC 360
CSP EIO
UJP L19
L18 LAB
LDA 1,13
CSP SIO
LDA 1,24872
MST 2,4,4
LOD A,2,24
IND A,0
CHK A,-1,0
PAR A
LOC 370
CUP I,2,GETS1008
CHK J,0,285
IXA 15
LDC I,15
LDC I,15
CSP WRS
CSP WLN
CSP EIO
L19 LAB
RET P
L1 DEF 32
SST P PRINT013 2 4 0 0 4
LOC 0
PRINT013 ENT P,2,L1 PRINT_NESTIT 1 1 1
LDA 1,39928
LOD I,2,8
CHK J,0,8
IXA 48
STR A,2,12
LDA 1,13
CSP SIO
LCA ' NESTDISPLAY['
LDC I,13
LOC 10
LDC I,13
CSP WRS
LOD I,2,8
MST 2,4,4
LOD I,2,8
PAR I
CUP I,2,FLDW0001
CSP WRI
LCA '] IS'
LDC I,4
LOC 20
LDC I,4
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
LOD A,2,12
LOC 30
INC A,4
LDC I,8
LDC I,8
CSP WRS
LCA ' TYP'
LDC I,4
LDC I,4
CSP WRS
LDA 1,30724
LOD A,2,12
LOC 40
IND I,0
CHK J,0,15
IXA 1
IND C,0
LDC I,1
CSP WRC
LCA ' AREAS '
LDC I,8
LDC I,8
CSP WRS
LOC 50
LOD A,2,12
IND I,28
LDC I,12
CSP WRI
LOD A,2,12
IND I,44
LDC I,12
CSP WRI
LOD A,2,12
IND I,40
LOC 60
LDC I,12
CSP WRI
LOD A,2,12
IND I,36
LDC I,12
CSP WRI
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LOC 70
LCA ' DISPLACEMENTS'
LDC I,14
LDC I,14
CSP WRS
LOD A,2,12
IND I,32
LDC I,12
CSP WRI
LOD A,2,12
IND I,24
LOC 80
LDC I,12
CSP WRI
LOD A,2,12
IND I,20
LDC I,12
CSP WRI
LOD A,2,12
IND I,16
LDC I,12
CSP WRI
LOC 90
CSP WLN
CSP EIO
RET P
L1 DEF 16
SST P PRINT014 2 4 0 0 4
LOC 0
PRINT014 ENT P,2,L1 PRINT_MSTENT 1 1 1
LDA 1,39476
LOD I,1,39924
CHK J,0,15
IXA 28
STR A,2,12
LDA 1,13
CSP SIO
LCA ' MSTSTK['
LDC I,8
LOC 10
LDC I,8
CSP WRS
LOD I,2,8
MST 2,4,4
LOD I,2,8
PAR I
CUP I,2,FLDW0001
CSP WRI
LCA '] IS'
LDC I,4
LOC 20
LDC I,4
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA ' LEV'
LDC I,4
LDC I,4
CSP WRS
LOC 30
LOD A,2,12
IND I,0
LDC I,2
CSP WRI
LCA ', EXPR'
LDC I,7
LDC I,7
CSP WRS
LOD A,2,12
IND I,4
LOC 40
LDC I,3
CSP WRI
LCA ', PREGS'
LDC I,8
LDC I,8
CSP WRS
LOD A,2,12
IND I,8
LDC I,3
CSP WRI
LOC 50
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA ' EVALSAVE'
LDC I,9
LDC I,9
CSP WRS
LOD A,2,12
IND I,20
LOC 60
MST 2,4,4
LOD A,2,12
IND I,20
PAR I
CUP I,2,FLDW0001
CSP WRI
LCA ', AREAS'
LDC I,8
LDC I,8
CSP WRS
LOC 70
LOD A,2,12
IND I,12
LDC I,12
CSP WRI
LOD A,2,12
IND I,16
LDC I,12
CSP WRI
CSP WLN
CSP EIO
LOC 80
RET P
L1 DEF 16
SST P PRINT015 2 0 0 4 0
SST P PRINT016 3 4 0 4 4
LOC 0
PRINT016 ENT P,3,L1 PRINTNAM 1 1 1
LDA 1,13
CSP SIO
LCA ' '
LDC I,2
LDC I,2
CSP WRS
CSP EIO
LDC I,1
CHK I,0,8
LOC 10
STR I,3,12
LOD A,3,8
IND I,8
CHK I,0,8
STR I,3,16
LOD I,3,12
LOD I,3,16
LEQ I
FJP L3
L2 LAB
LDA 1,13
LOC 20
CSP SIO
LOD A,3,8
LOD I,3,12
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC I,1
CSP WRC
CSP EIO
LOC 30
LOD I,3,12
LOD I,3,16
NEQ I
FJP L3
LOD I,3,12
INC I,1
CHK I,0,8
STR I,3,12
UJP L2
L3 LAB
RET P
L1 DEF 20
SST P PRINT017 3 4 0 0 4
LOC 0
PRINT017 ENT P,3,L1 PRINTTYP 1 1 1
LDA 1,13
CSP SIO
LCA ' '
LDC I,2
LDC I,2
CSP WRS
LDA 1,30724
LOD I,3,8
CHK J,0,15
LOC 10
IXA 1
IND C,0
LDC I,1
CSP WRC
CSP EIO
RET P
L1 DEF 12
SST P PRINT018 3 4 0 0 4
LOC 0
PRINT018 ENT P,3,L1 PRINTINT 1 1 1
LDA 1,13
CSP SIO
LCA ' '
LDC I,2
LDC I,2
CSP WRS
LOD I,3,8
MST 2,4,4
LOD I,3,8
LOC 10
PAR I
CUP I,2,FLDW0001
CSP WRI
CSP EIO
RET P
L1 DEF 12
LOC 0
PRINT015 ENT P,2,L1 PRINTNXTINST 1 1 1
LOD I,1,44
LDC I,24
EQU I
LOD I,1,44
LDC I,10
EQU I
IOR
LOD I,1,44
LDC I,13
LOC 10
EQU I
IOR
FJP L2
MST 3,4,4
LDA 1,112
PAR A
CUP P,2,PRINT016
UJP L3
L2 LAB
LDA 1,13
CSP SIO
LOC 20
LDC C,' '
LDC I,1
CSP WRC
CSP EIO
L3 LAB
LDA 1,13
CSP SIO
LCA ' '
LDC I,2
LDC I,2
CSP WRS
LOC 30
LDA 1,48
LDC I,3
LDC I,3
CSP WRS
CSP EIO
LOD I,1,44
ORD
CHK I,0,72
XJP L4
L8 LAB
UJP L7
L9 LAB
LOC 40
MST 3,4,4
LOD I,1,52
CHK I,0,15
PAR I
CUP P,2,PRINT017
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOC 50
LDA 1,100
PAR A
CUP P,2,PRINT016
MST 3,4,4
LDA 1,88
PAR A
CUP P,2,PRINT016
MST 3,4,4
LOD I,1,68
PAR I
LOC 60
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,64
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,60
PAR I
CUP P,2,PRINT018
UJP L7
L10 LAB
LOC 70
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,68
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,64
LOC 80
PAR I
CUP P,2,PRINT018
UJP L7
L11 LAB
UJP L7
L12 LAB
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
UJP L7
L13 LAB
MST 3,4,4
LOC 90
LOD I,1,52
CHK I,0,15
PAR I
CUP P,2,PRINT017
MST 3,4,4
LDA 1,100
PAR A
CUP P,2,PRINT016
MST 3,4,4
LOD I,1,72
LOC 100
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,68
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,64
PAR I
CUP P,2,PRINT018
LOC 110
MST 3,4,4
LOD I,1,60
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,56
PAR I
CUP P,2,PRINT018
UJP L7
L14 LAB
MST 3,4,4
LOC 120
LDA 1,100
PAR A
CUP P,2,PRINT016
UJP L7
L15 LAB
MST 3,4,4
LDA 1,100
PAR A
CUP P,2,PRINT016
LDA 1,100
LCA 'PCODE '
LOC 130
NEQ M,8
FJP L16
MST 3,4,4
LDA 1,88
PAR A
CUP P,2,PRINT016
LDA 1,88
LDC I,1
CHK J,1,8
DEC I,1
LOC 140
IXA 1
IND C,0
LDC C,'A'
EQU C
LDA 1,100
LCA 'S1CODE '
NEQ M,8
AND
FJP L17
MST 3,4,4
LOC 150
LOD I,1,72
PAR I
CUP P,2,PRINT018
L17 LAB
L16 LAB
UJP L7
L18 LAB
UJP L7
L19 LAB
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
UJP L7
L20 LAB
LOC 160
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,68
PAR I
CUP P,2,PRINT018
UJP L7
L21 LAB
MST 3,4,4
LOC 170
LDA 1,100
PAR A
CUP P,2,PRINT016
UJP L7
L22 LAB
MST 3,4,4
LOD I,1,52
CHK I,0,15
PAR I
CUP P,2,PRINT017
LOD I,1,52
LOC 180
LDC I,3
EQU I
FJP L23
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
L23 LAB
UJP L7
L24 LAB
MST 3,4,4
LOD I,1,52
LOC 190
CHK I,0,15
PAR I
CUP P,2,PRINT017
UJP L7
L25 LAB
MST 3,4,4
LOD I,1,52
CHK I,0,15
PAR I
CUP P,2,PRINT017
MST 3,4,4
LOC 200
LOD I,1,72
PAR I
CUP P,2,PRINT018
UJP L7
L26 LAB
MST 3,4,4
LOD I,1,52
CHK I,0,15
PAR I
CUP P,2,PRINT017
MST 3,4,4
LOC 210
LOD I,1,72
PAR I
CUP P,2,PRINT018
MST 3,4,4
LOD I,1,68
PAR I
CUP P,2,PRINT018
UJP L7
L27 LAB
MST 3,4,4
LDA 1,100
LOC 220
PAR A
CUP P,2,PRINT016
UJP L7
L28 LAB
MST 3,4,4
LOD I,1,52
CHK I,0,15
PAR I
CUP P,2,PRINT017
MST 3,4,4
LOD I,1,72
LOC 230
PAR I
CUP P,2,PRINT018
MST 3,4,4
LDA 1,100
PAR A
CUP P,2,PRINT016
UJP L7
L29 LAB
MST 3,4,4
LOD I,1,52
CHK I,0,15
LOC 240
PAR I
CUP P,2,PRINT017
LOD I,1,52
ORD
CHK I,0,15
XJP L30
L34 LAB
MST 3,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT018
LOC 250
UJP L33
L35 LAB
LDA 1,13
CSP SIO
LCA ' '''
LDC I,2
LDC I,2
CSP WRS
LOD I,1,72
CHR
LDC I,1
LOC 260
CSP WRC
LDC C,'''
LDC I,1
CSP WRC
CSP EIO
UJP L33
L36 LAB
LDA 1,13
CSP SIO
LCA ' '
LDC I,2
LOC 270
LDC I,2
CSP WRS
LOD R,1,76
LDC I,14
LDC I,0
CSP WRR
CSP EIO
UJP L33
L37 LAB
UJP L33
L38 LAB
MST 3,4,4
LOC 280
LOD I,1,72
PAR I
CUP P,2,PRINT018
UJP L33
L39 LAB
MST 2,8,8
LOD S,1,80
PAR S
CUP P,2,PRINT010
UJP L33
L30 DEF 4
L31 DEF 13
L32 LAB
UJP L37
LOC 290
UJP L38
UJP L35
UJP L39
UJP L33
UJP L33
UJP L34
UJP L33
UJP L33
UJP L36
L33 LAB
UJP L7
L41 LAB
LOC 300
LDA 1,13
CSP SIO
LCA ' '''
LDC I,3
LDC I,3
CSP WRS
CSP EIO
LDC I,1
CHK I,0,150
STR I,2,8
LOC 310
LOD I,1,276
CHK I,0,150
STR I,2,12
LOD I,2,8
LOD I,2,12
LEQ I
FJP L43
L42 LAB
LDA 1,13
CSP SIO
LDA 1,124
LOC 320
LOD I,2,8
CHK J,1,150
DEC I,1
IXA 1
IND C,0
LDC I,1
CSP WRC
CSP EIO
LOD I,2,8
LOD I,2,12
LOC 330
NEQ I
FJP L43
LOD I,2,8
INC I,1
CHK I,0,150
STR I,2,8
UJP L42
L43 LAB
LDA 1,13
CSP SIO
LDC C,'''
LOC 340
LDC I,1
CSP WRC
CSP EIO
UJP L7
L4 DEF 0
L5 DEF 72
L6 LAB
UJP L18
UJP L18
UJP L18
UJP L18
UJP L19
UJP L26
LOC 350
UJP L18
UJP L27
UJP L28
UJP L25
UJP L12
UJP L18
UJP L18
UJP L9
UJP L18
UJP L21
LOC 360
UJP L18
UJP L18
UJP L25
UJP L25
UJP L18
UJP L18
UJP L18
UJP L19
UJP L11
UJP L19
LOC 370
UJP L41
UJP L20
UJP L29
UJP L25
UJP L19
UJP L26
UJP L18
UJP L19
UJP L18
UJP L10
LOC 380
UJP L19
UJP L18
UJP L18
UJP L18
UJP L18
UJP L18
UJP L24
UJP L18
UJP L24
UJP L18
LOC 390
UJP L18
UJP L18
UJP L18
UJP L18
UJP L18
UJP L25
UJP L13
UJP L24
UJP L8
UJP L26
LOC 400
UJP L18
UJP L14
UJP L15
UJP L18
UJP L21
UJP L18
UJP L21
UJP L18
UJP L18
UJP L18
LOC 410
UJP L18
UJP L22
UJP L22
UJP L22
UJP L22
UJP L22
UJP L22
L7 LAB
LDA 1,13
CSP SIO
CSP WLN
LOC 420
CSP EIO
RET P
L1 DEF 16
SST P NEWCO019 2 4 0 0 4
LOC 0
NEWCO019 ENT P,2,L1 NEWCODEREC 1 1 1
LOD A,2,8
NEW 12
LOD A,2,8
IND A,0
CHK A,0,0
LDC N
CHK A,-1,0
STO A
LOD A,2,8
LOC 10
IND A,0
CHK A,0,0
INC A,4
LDA 1,4568
MOV 8
RET P
L1 DEF 12
SST I GETFI020 2 12 0 12 12
LOC 0
GETFI020 ENT I,2,L1 GETFIELD 1 1 1
LOD I,1,41528
LDC I,1
ADI
STR I,1,41528
LOD A,2,8
IND I,4
STR I,2,24
LOD A,2,8
IND I,0
LOC 10
STR I,2,20
LOD I,2,12
LOD I,2,16
ADI
STR I,2,28
LOD I,2,16
LDC I,36
LDC I,1
SBI
LEQ I
LOC 20
LDC I,0
LOD I,2,24
LEQ I
AND
LOD I,2,24
LDA 1,4864
LDC I,18
CHK J,0,34
IXA 4
IND I,0
LOC 30
LES I
AND
LDC I,0
LOD I,2,20
LEQ I
AND
LOD I,2,20
LDA 1,4864
LDC I,18
CHK J,0,34
LOC 40
IXA 4
IND I,0
LES I
AND
NOT
FJP L2
MST 2,4,4
LCA 'GETFIELD 001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOC 50
LOD I,2,12
LDC I,17
LEQ I
FJP L3
LOD I,2,28
LDC I,18
GRT I
FJP L4
LOD I,2,24
LDA 1,4864
LOC 60
LDC I,18
LOD I,2,12
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
LDA 1,4864
LOD I,2,28
LDC I,18
LOC 70
SBI
CHK J,0,34
IXA 4
IND I,0
MPI
LOD I,2,20
LDA 1,4864
LDC I,36
LOD I,2,28
SBI
LOC 80
CHK J,0,34
IXA 4
IND I,0
DVI
ADI
STR I,2,0
UJP L5
L4 LAB
LOD I,2,24
LDA 1,4864
LDC I,18
LOC 90
LOD I,2,12
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
LDA 1,4864
LDC I,18
LOD I,2,28
SBI
LOC 100
CHK J,0,34
IXA 4
IND I,0
DVI
STR I,2,0
L5 LAB
UJP L6
L3 LAB
LOD I,2,20
LDA 1,4864
LDC I,36
LOD I,2,12
LOC 110
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
LDA 1,4864
LDC I,36
LOD I,2,28
SBI
CHK J,0,34
LOC 120
IXA 4
IND I,0
DVI
STR I,2,0
L6 LAB
RET I
L1 DEF 32
SST I GETSI021 2 12 0 4 12
LOC 0
GETSI021 ENT I,2,L1 GETSIGNEDFIE 1 1 1
LOD I,2,16
LDC I,36
LDC I,1
SBI
LEQ I
NOT
FJP L2
MST 2,4,4
LCA 'GETSIGNED001'
LOC 10
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,12,12
LOD A,2,8
PAR A
LOD I,2,12
CHK I,0,35
PAR I
LOD I,2,16
CHK I,1,36
LOC 20
PAR I
CUP I,6,GETFI020
STR I,2,20
LOD I,2,20
LDA 1,4864
LOD I,2,16
LDC I,1
SBI
CHK J,0,34
IXA 4
LOC 30
IND I,0
GEQ I
LOD I,2,16
LDC I,36
LES I
AND
FJP L3
LOD I,2,16
LDC I,34
LEQ I
LOC 40
FJP L4
LOD I,2,20
LDA 1,4864
LOD I,2,16
CHK J,0,34
IXA 4
IND I,0
SBI
STR I,2,0
UJP L5
L4 LAB
LOC 50
LOD I,2,20
LDA 1,4864
LDC I,34
CHK J,0,34
IXA 4
IND I,0
SBI
STR I,2,20
LOD I,2,20
LDA 1,4864
LOC 60
LDC I,34
CHK J,0,34
IXA 4
IND I,0
SBI
STR I,2,0
L5 LAB
UJP L6
L3 LAB
LOD I,2,20
STR I,2,0
L6 LAB
RET I
L1 DEF 24
SST P PUTFI022 2 16 0 16 16
LOC 0
PUTFI022 ENT P,2,L1 PUTFIELD 1 1 1
LOD I,2,16
LDC I,36
LDC I,1
SBI
LEQ I
NOT
FJP L2
MST 2,4,4
LCA 'PUTFIELD 001'
LOC 10
PAR A
CUP P,2,ASSER003
L2 LAB
LOD A,2,8
IND I,4
STR I,2,28
LOD A,2,8
IND I,0
STR I,2,24
LOD I,2,12
LOD I,2,16
LOC 20
ADI
STR I,2,36
LDC I,0
LOD I,2,28
LEQ I
LOD I,2,28
LDA 1,4864
LDC I,18
CHK J,0,34
IXA 4
LOC 30
IND I,0
LES I
AND
LDC I,0
LOD I,2,24
LEQ I
AND
LOD I,2,24
LDA 1,4864
LDC I,18
LOC 40
CHK J,0,34
IXA 4
IND I,0
LES I
AND
NOT
FJP L3
MST 2,4,4
LCA 'PUTFIELD 002'
PAR A
LOC 50
CUP P,2,ASSER003
L3 LAB
LOD I,2,20
LDC I,0
LES I
FJP L4
LOD I,2,16
LDC I,34
LEQ I
FJP L5
LOD I,2,20
LOC 60
LDA 1,4864
LOD I,2,16
CHK J,0,34
IXA 4
IND I,0
ADI
STR I,2,20
UJP L6
L5 LAB
LOD I,2,20
LDA 1,4864
LOC 70
LDC I,34
CHK J,0,34
IXA 4
IND I,0
ADI
STR I,2,20
LOD I,2,20
LDA 1,4864
LDC I,34
CHK J,0,34
LOC 80
IXA 4
IND I,0
ADI
STR I,2,20
L6 LAB
L4 LAB
LDC I,0
LOD I,2,20
LEQ I
NOT
FJP L7
MST 2,4,4
LOC 90
LCA 'PUTFIELD 003'
PAR A
CUP P,2,ASSER003
L7 LAB
LOD I,2,16
LDC I,34
LEQ I
FJP L8
LOD I,2,20
LDA 1,4864
LOD I,2,16
LOC 100
CHK J,0,34
IXA 4
IND I,0
LES I
NOT
FJP L9
MST 2,4,4
LCA 'PUTFIELD 004'
PAR A
CUP P,2,ASSER003
L9 LAB
L8 LAB
LOC 110
LOD I,2,12
LDC I,17
LEQ I
FJP L10
LOD I,2,36
LDC I,18
GRT I
FJP L11
LOD I,2,28
LOD I,2,28
LOC 120
LDA 1,4864
LDC I,18
LOD I,2,12
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
SBI
LOD I,2,20
LOC 130
LDA 1,4864
LOD I,2,36
LDC I,18
SBI
CHK J,0,34
IXA 4
IND I,0
DVI
ADI
STR I,2,28
LOC 140
LOD I,2,24
LDA 1,4864
LDC I,36
LOD I,2,36
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
LOD I,2,20
LOC 150
LDA 1,4864
LOD I,2,36
LDC I,18
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
LDA 1,4864
LDC I,36
LOC 160
LOD I,2,36
SBI
CHK J,0,34
IXA 4
IND I,0
MPI
ADI
STR I,2,24
UJP L12
L11 LAB
LOD I,2,28
LOC 170
LOD I,2,28
LDA 1,4864
LDC I,18
LOD I,2,12
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
SBI
LOC 180
LOD I,2,28
LDA 1,4864
LDC I,18
LOD I,2,36
SBI
CHK J,0,34
IXA 4
IND I,0
MOD
ADI
LOC 190
LOD I,2,20
LDA 1,4864
LDC I,18
LOD I,2,36
SBI
CHK J,0,34
IXA 4
IND I,0
MPI
ADI
LOC 200
STR I,2,28
L12 LAB
UJP L13
L10 LAB
LOD I,2,24
LOD I,2,24
LDA 1,4864
LDC I,36
LOD I,2,12
SBI
CHK J,0,34
IXA 4
LOC 210
IND I,0
MOD
SBI
LOD I,2,24
LDA 1,4864
LDC I,36
LOD I,2,36
SBI
CHK J,0,34
IXA 4
LOC 220
IND I,0
MOD
ADI
LOD I,2,20
LDA 1,4864
LDC I,36
LOD I,2,36
SBI
CHK J,0,34
IXA 4
LOC 230
IND I,0
MPI
ADI
STR I,2,24
L13 LAB
LOD A,2,8
INC A,4
LOD I,2,28
STO I
LOD A,2,8
LOD I,2,24
LOC 240
STO I
RET P
L1 DEF 40
SST P REAL$023 2 8 0 12 8
LOC 0
REAL$023 ENT P,2,L1 REAL_TO_S1WO 1 1 1
LDC R,0.0
STR R,2,16
LDC I,1
NGI
STR I,2,20
LDC I,36
CHK S,0,63
LOD S,2,16
INN
LOC 10
FJP L2
LOD R,2,12
STR R,2,16
LDC I,0
STR I,2,20
LOD A,2,8
LDA 1,4568
MOV 8
LDC I,0
CHK I,0,63
LOC 20
STR I,2,24
LDC I,36
LDC I,1
SBI
CHK I,0,63
STR I,2,28
LOD I,2,24
LOD I,2,28
LEQ I
FJP L4
L3 LAB
LOC 30
LOD I,2,24
CHK S,0,63
LOD S,2,16
INN
FJP L5
MST 2,16,16
LOD A,2,8
PAR A
LOD I,2,24
CHK I,0,35
LOC 40
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
PAR I
CUP P,8,PUTFI022
L5 LAB
LOD I,2,24
LOD I,2,28
NEQ I
LOC 50
FJP L4
LOD I,2,24
INC I,1
CHK I,0,63
STR I,2,24
UJP L3
L4 LAB
UJP L6
L2 LAB
LDC I,0
STR I,2,16
LOD R,2,12
LOC 60
STR R,2,20
LOD A,2,8
LDA 1,4568
MOV 8
LDC I,36
LDC I,1
SBI
CHK I,0,63
STR I,2,24
LDC I,0
LOC 70
CHK I,0,63
STR I,2,28
LOD I,2,24
LOD I,2,28
GEQ I
FJP L8
L7 LAB
LOD I,2,24
CHK S,0,63
LOD S,2,16
INN
LOC 80
FJP L9
MST 2,16,16
LOD A,2,8
PAR A
LDC I,36
LDC I,1
SBI
LOD I,2,24
SBI
CHK I,0,35
LOC 90
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
PAR I
CUP P,8,PUTFI022
L9 LAB
LOD I,2,24
LOD I,2,28
NEQ I
LOC 100
FJP L8
LOD I,2,24
DEC I,1
CHK I,0,63
STR I,2,24
UJP L7
L8 LAB
L6 LAB
RET P
L1 DEF 32
SST P ZSYMB024 2 12 8 8 12
LOC 0
ZSYMB024 ENT P,2,L1 ZSYMBOL_TO_S 1 1 1
LDA 2,20
LOD A,2,16
MOV 8
LOD A,2,8
LDA 1,4568
MOV 8
LOD A,2,12
LDA 1,4568
MOV 8
LOC 10
LDC I,0
STR I,2,28
LDC I,1
STR I,2,32
LDC I,4
STR I,2,36
LOD I,2,32
LOD I,2,36
LEQ I
FJP L3
L2 LAB
LOC 20
MST 2,16,16
LOD A,2,8
PAR A
LOD I,2,28
CHK I,0,35
PAR I
LDC I,9
CHK I,1,36
PAR I
LDA 2,20
LOC 30
LOD I,2,32
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
LDC I,0
SBI
PAR I
CUP P,8,PUTFI022
LOC 40
LOD I,2,28
LDC I,9
ADI
STR I,2,28
LOD I,2,32
LOD I,2,36
NEQ I
FJP L3
LOD I,2,32
INC I,1
LOC 50
STR I,2,32
UJP L2
L3 LAB
LDC I,0
STR I,2,28
LDC I,1
STR I,2,32
LDC I,4
STR I,2,36
LOD I,2,32
LOD I,2,36
LOC 60
LEQ I
FJP L5
L4 LAB
MST 2,16,16
LOD A,2,12
PAR A
LOD I,2,28
CHK I,0,35
PAR I
LDC I,9
CHK I,1,36
LOC 70
PAR I
LDA 2,20
LDC I,4
LOD I,2,32
ADI
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
LOC 80
LDC I,0
SBI
PAR I
CUP P,8,PUTFI022
LOD I,2,28
LDC I,9
ADI
STR I,2,28
LOD I,2,32
LOD I,2,36
LOC 90
NEQ I
FJP L5
LOD I,2,32
INC I,1
STR I,2,32
UJP L4
L5 LAB
RET P
L1 DEF 40
SST P INTEG025 2 8 0 0 8
LOC 0
INTEG025 ENT P,2,L1 INTEGER_TO_S 1 1 1
LOD A,2,8
LDA 1,4568
MOV 8
MST 2,16,16
LOD A,2,8
PAR A
LDC I,36
LDC I,36
LDC I,1
LOC 10
SBI
SBI
CHK I,0,35
PAR I
LDC I,36
LDC I,1
SBI
CHK I,1,36
PAR I
LOD I,2,12
LOC 20
PAR I
CUP P,8,PUTFI022
LOD I,2,12
LDC I,0
LES I
FJP L2
MST 2,16,16
LOD A,2,8
PAR A
LDC I,0
LOC 30
CHK I,0,35
PAR I
LDC I,36
LDC I,36
LDC I,1
SBI
SBI
CHK I,1,36
PAR I
LDC I,1
LOC 40
NGI
PAR I
CUP P,8,PUTFI022
L2 LAB
RET P
L1 DEF 16
SST P SETRE026 2 16 0 4 16
LOC 0
SETRE026 ENT P,2,L1 SETREP_TO_S1 1 1 1
LOD A,2,8
LDA 1,4568
MOV 8
LOD A,2,12
LDA 1,4568
MOV 8
LDC I,63
CHK I,0,63
STR I,2,24
LOC 10
LDC I,36
CHK I,0,63
STR I,2,28
LOD I,2,24
LOD I,2,28
GEQ I
FJP L3
L2 LAB
LOD I,2,24
CHK S,0,63
LOD S,2,16
LOC 20
INN
FJP L4
MST 2,16,16
LOD A,2,8
PAR A
LDC I,2
LDC I,36
MPI
LDC I,1
SBI
LOC 30
LOD I,2,24
SBI
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
PAR I
CUP P,8,PUTFI022
L4 LAB
LOC 40
LOD I,2,24
LOD I,2,28
NEQ I
FJP L3
LOD I,2,24
DEC I,1
CHK I,0,63
STR I,2,24
UJP L2
L3 LAB
LDC I,36
LOC 50
LDC I,1
SBI
CHK I,0,63
STR I,2,24
LDC I,0
CHK I,0,63
STR I,2,28
LOD I,2,24
LOD I,2,28
GEQ I
LOC 60
FJP L6
L5 LAB
LOD I,2,24
CHK S,0,63
LOD S,2,16
INN
FJP L7
MST 2,16,16
LOD A,2,12
PAR A
LDC I,36
LOC 70
LDC I,1
SBI
LOD I,2,24
SBI
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
LOC 80
PAR I
CUP P,8,PUTFI022
L7 LAB
LOD I,2,24
LOD I,2,28
NEQ I
FJP L6
LOD I,2,24
DEC I,1
CHK I,0,63
STR I,2,24
LOC 90
UJP L5
L6 LAB
RET P
L1 DEF 32
SST I LABEL027 2 4 0 0 4
LOC 0
LABEL027 ENT I,2,L1 LABELHASH 1 1 1
LOD I,2,8
ABI
LDC I,197
MOD
CHK I,0,196
STR I,2,0
RET I
L1 DEF 12
SST I LABEL028 2 4 0 8 4
LOC 0
LABEL028 ENT I,2,L1 LABELNUMBER 1 1 1
LDC I,2
CHK I,1,8
STR I,2,12
LDC I,0
CHK I,0,99999
STR I,2,16
L2 LAB
LOD I,2,12
LDC I,8
LES I
LOC 10
LOD A,2,8
LOD I,2,12
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,' '
NEQ C
AND
FJP L3
LOC 20
LOD I,2,16
LDC I,10
MPI
LOD A,2,8
LOD I,2,12
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
LOC 30
ADI
LDC C,'0'
ORD
SBI
CHK I,0,99999
STR I,2,16
LOD I,2,12
LDC I,1
ADI
CHK I,1,8
LOC 40
STR I,2,12
UJP L2
L3 LAB
LOD A,2,8
LOD I,2,12
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,' '
EQU C
LOC 50
FJP L4
LOD I,2,16
CHK I,1,99999
STR I,2,0
UJP L5
L4 LAB
LOD I,2,16
LDC I,10
MPI
LOD A,2,8
LOD I,2,12
LOC 60
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
ADI
LDC C,'0'
ORD
SBI
CHK I,1,99999
LOC 70
STR I,2,0
L5 LAB
RET I
L1 DEF 20
SST I MIN00029 2 8 0 0 8
LOC 0
MIN00029 ENT I,2,L1 MIN 1 1 1
LOD I,2,8
LOD I,2,12
LES I
FJP L2
LOD I,2,8
STR I,2,0
UJP L3
L2 LAB
LOD I,2,12
STR I,2,0
L3 LAB
LOC 10
RET I
L1 DEF 16
SST I MAX00030 2 8 0 0 8
LOC 0
MAX00030 ENT I,2,L1 MAX 1 1 1
LOD I,2,8
LOD I,2,12
GRT I
FJP L2
LOD I,2,8
STR I,2,0
UJP L3
L2 LAB
LOD I,2,12
STR I,2,0
L3 LAB
LOC 10
RET I
L1 DEF 16
SST I POWER031 2 4 0 4 4
LOC 0
POWER031 ENT I,2,L1 POWER2 1 1 1
LOD I,2,8
LDC I,0
LEQ I
FJP L2
LDC I,999
NGI
STR I,2,0
UJP L3
L2 LAB
LOD I,2,8
LOC 10
LDC I,1
EQU I
FJP L4
LDC I,0
STR I,2,0
UJP L5
L4 LAB
LOD I,2,8
ODD
FJP L6
LDC I,999
LOC 20
NGI
STR I,2,0
UJP L7
L6 LAB
LOD I,2,8
LDC I,2
EQU I
FJP L8
LDC I,1
STR I,2,0
UJP L9
L8 LAB
LOC 30
LOD I,2,8
LDC I,4
EQU I
FJP L10
LDC I,2
STR I,2,0
UJP L11
L10 LAB
LOD I,2,8
LDC I,8
EQU I
LOC 40
FJP L12
LDC I,3
STR I,2,0
UJP L13
L12 LAB
LOD I,2,8
LDC I,16
EQU I
FJP L14
LDC I,4
STR I,2,0
LOC 50
UJP L15
L14 LAB
LOD I,2,8
LDC I,32
EQU I
FJP L16
LDC I,5
STR I,2,0
UJP L17
L16 LAB
LDC I,0
STR I,2,12
L18 LAB
LOC 60
LOD I,2,12
LDC I,1
ADI
STR I,2,12
LOD I,2,8
LDC I,2
DVI
STR I,2,8
LOD I,2,8
ODD
LOC 70
LOD I,2,8
LDC I,32
LEQ I
IOR
FJP L18
LOD I,2,8
LDC I,32
EQU I
FJP L19
LOD I,2,12
LOC 80
LDC I,5
ADI
STR I,2,0
UJP L20
L19 LAB
LDC I,999
NGI
STR I,2,0
L20 LAB
L17 LAB
L15 LAB
L13 LAB
L11 LAB
L9 LAB
L7 LAB
L5 LAB
L3 LAB
RET I
L1 DEF 16
SST I FLDW0001 2 4 0 4 4
LOC 0
FLDW0001 ENT I,2,L1 FLDW 1 1 1
LDC I,0
STR I,2,12
LOD I,2,8
LDC I,0
LES I
FJP L2
LDC I,1
STR I,2,12
LOD I,2,8
LOC 10
ABI
STR I,2,8
L2 LAB
L3 LAB
LOD I,2,8
LDC I,10
DVI
STR I,2,8
LOD I,2,12
LDC I,1
ADI
STR I,2,12
LOC 20
LOD I,2,8
LDC I,0
EQU I
FJP L3
LOD I,2,12
STR I,2,0
RET I
L1 DEF 16
SST P CVOS$032 2 8 8 4 8
LOC 0
CVOS$032 ENT P,2,L1 CVOS_S1WORD_ 1 1 1
LDA 2,16
LOD A,2,12
MOV 8
LDC I,1
CHK I,1,12
STR I,2,24
LDC I,12
CHK I,1,12
STR I,2,28
LOC 10
LOD I,2,24
LOD I,2,28
LEQ I
FJP L3
L2 LAB
LOD A,2,8
LOD I,2,24
CHK J,1,12
DEC I,1
IXA 1
LDC C,'0'
LOC 20
ORD
MST 2,12,12
LDA 2,16
PAR A
LDC I,3
LOD I,2,24
LDC I,1
SBI
MPI
CHK I,0,35
LOC 30
PAR I
LDC I,3
CHK I,1,36
PAR I
CUP I,6,GETFI020
ADI
CHR
CHK I,0,255
STO C
LOD I,2,24
LOC 40
LOD I,2,28
NEQ I
FJP L3
LOD I,2,24
INC I,1
CHK I,1,12
STR I,2,24
UJP L2
L3 LAB
LDC I,1
CHK I,1,12
LOC 50
STR I,2,24
L4 LAB
LOD I,2,24
LDC I,12
LES I
LOD A,2,8
LOD I,2,24
CHK J,1,12
DEC I,1
IXA 1
IND C,0
LOC 60
LDC C,'0'
EQU C
AND
FJP L5
LOD A,2,8
LOD I,2,24
CHK J,1,12
DEC I,1
IXA 1
LDC C,' '
LOC 70
CHK I,0,255
STO C
LOD I,2,24
LDC I,1
ADI
CHK I,1,12
STR I,2,24
UJP L4
L5 LAB
RET P
L1 DEF 32
SST P CVOS$033 2 8 0 4 8
LOC 0
CVOS$033 ENT P,2,L1 CVOS_12 1 1 1
LOD A,2,8
LCA ' 0'
MOV 12
LDC I,12
CHK I,1,12
STR I,2,16
L2 LAB
LOD I,2,12
LDC I,0
GRT I
LOC 10
FJP L3
LOD A,2,8
LOD I,2,16
CHK J,1,12
DEC I,1
IXA 1
LDC C,'0'
ORD
LOD I,2,12
LDC I,8
LOC 20
MOD
ADI
CHR
CHK I,0,255
STO C
LOD I,2,12
LDC I,8
DVI
CHK I,0,34359738367
STR I,2,12
LOC 30
LOD I,2,16
LDC I,1
SBI
CHK I,1,12
STR I,2,16
UJP L2
L3 LAB
RET P
L1 DEF 20
SST P CVOS$034 2 8 0 4 8
LOC 0
CVOS$034 ENT P,2,L1 CVOS_10 1 1 1
LOD A,2,8
LCA ' 0'
MOV 10
LDC I,10
CHK I,1,10
STR I,2,16
L2 LAB
LOD I,2,12
LDC I,0
GRT I
LOC 10
FJP L3
LOD I,2,16
LDC I,0
GRT I
NOT
FJP L4
MST 2,4,4
LCA 'CVOS_10 001'
PAR A
CUP P,2,ASSER003
L4 LAB
LOC 20
LOD A,2,8
LOD I,2,16
CHK J,1,10
DEC I,1
IXA 1
LDC C,'0'
ORD
LOD I,2,12
LDC I,8
MOD
LOC 30
ADI
CHR
CHK I,0,255
STO C
LOD I,2,12
LDC I,8
DVI
CHK I,0,34359738367
STR I,2,12
LOD I,2,16
LOC 40
LDC I,1
SBI
CHK I,1,10
STR I,2,16
UJP L2
L3 LAB
RET P
L1 DEF 20
SST I CSP$H035 2 4 0 0 4
LOC 0
CSP$H035 ENT I,2,L1 CSP_HASH 1 1 1
LOD A,2,8
LDC I,1
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
LDC I,676
MPI
LOC 10
LOD A,2,8
LDC I,2
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
LDC I,26
MPI
ADI
LOC 20
LOD A,2,8
LDC I,3
CHK J,1,8
DEC I,1
IXA 1
IND C,0
ORD
ADI
LDC I,91
MOD
LOC 30
STR I,2,0
RET I
L1 DEF 12
SST I OPC$H036 2 4 0 0 4
LOC 0
OPC$H036 ENT I,2,L1 OPC_HASH 1 1 1
LOD A,2,8
LDC I,1
CHK J,1,3
DEC I,1
IXA 1
IND C,0
ORD
LDC I,676
MPI
LOC 10
LOD A,2,8
LDC I,2
CHK J,1,3
DEC I,1
IXA 1
IND C,0
ORD
LDC I,26
MPI
ADI
LOC 20
LOD A,2,8
LDC I,3
CHK J,1,3
DEC I,1
IXA 1
IND C,0
ORD
ADI
LDC I,197
MOD
LOC 30
STR I,2,0
RET I
L1 DEF 12
SST I NAME$037 2 4 0 4 4
LOC 0
NAME$037 ENT I,2,L1 NAME_TO_CSP 1 1 1
MST 2,4,4
LOD A,2,8
PAR A
CUP I,2,CSP$H035
STR I,2,12
L2 LAB
LDA 1,1288
LOD I,2,12
CHK J,0,90
IXA 16
LOC 10
LOD A,2,8
NEQ M,12
LDA 1,1288
LOD I,2,12
CHK J,0,90
IXA 16
LCA ' '
NEQ M,8
AND
FJP L3
LOC 20
LOD I,2,12
LDC I,1
ADI
LDC I,91
MOD
STR I,2,12
UJP L2
L3 LAB
LDA 1,1288
LOD I,2,12
CHK J,0,90
LOC 30
IXA 16
LOD A,2,8
EQU M,12
FJP L4
LDA 1,1288
LOD I,2,12
CHK J,0,90
IXA 16
IND I,12
CHK I,0,31
LOC 40
STR I,2,0
UJP L5
L4 LAB
MST 2,4,4
LDC I,26
CHK I,0,68
PAR I
CUP P,2,ERROR005
L5 LAB
RET I
L1 DEF 16
SST I MNEM$038 2 4 0 4 4
LOC 0
MNEM$038 ENT I,2,L1 MNEM_TO_OPC 1 1 1
MST 2,4,4
LOD A,2,8
PAR A
CUP I,2,OPC$H036
STR I,2,12
L2 LAB
LDA 1,2744
LOD I,2,12
CHK J,0,196
IXA 8
LOC 10
LOD A,2,8
NEQ M,3
LDA 1,2744
LOD I,2,12
CHK J,0,196
IXA 8
LCA ' '
NEQ M,3
AND
FJP L3
LOC 20
LOD I,2,12
LDC I,1
ADI
LDC I,197
MOD
STR I,2,12
UJP L2
L3 LAB
LDA 1,2744
LOD I,2,12
CHK J,0,196
LOC 30
IXA 8
LOD A,2,8
EQU M,3
FJP L4
LDA 1,2744
LOD I,2,12
CHK J,0,196
IXA 8
IND I,4
CHK I,0,72
LOC 40
STR I,2,0
UJP L5
L4 LAB
MST 2,4,4
LDC I,27
CHK I,0,68
PAR I
CUP P,2,ERROR005
L5 LAB
RET I
L1 DEF 16
SST A PTR$O039 2 8 0 8 8
LOC 0
PTR$O039 ENT A,2,L1 PTR_OPNDXWD 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
CHK I,0,4
STR I,2,16
LOD I,2,16
LDC I,0
NEQ I
NOT
FJP L2
MST 2,4,4
LCA 'PTR_OPNDX001'
PAR A
LOC 20
CUP P,2,ASSER003
L2 LAB
LOD I,2,12
LDC I,24
EQU I
LOD B,1,35756
AND
LOD I,2,16
LDC I,2
EQU I
AND
LOC 30
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
LOC 40
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
AND
FJP L3
LDC N
CHK A,-1,0
STR A,2,0
UJP L4
L3 LAB
LOC 50
LOD A,2,8
CHK A,-1,0
STR A,2,20
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
LOC 60
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L5
LOD A,2,20
CHK A,0,0
LOC 70
IND A,0
CHK A,-1,0
STR A,2,20
L5 LAB
LOD I,2,12
LDC I,12
EQU I
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
LOC 80
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
LOC 90
AND
FJP L6
LOD A,2,20
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,20
L6 LAB
LOD A,2,20
LOD A,2,8
EQU A
LOC 100
FJP L7
LDC N
CHK A,-1,0
STR A,2,0
UJP L8
L7 LAB
LOD A,2,20
CHK A,-1,0
STR A,2,0
L8 LAB
L4 LAB
RET A
L1 DEF 24
SST B S1OPN040 2 16 0 8 16
LOC 0
S1OPN040 ENT B,2,L1 S1OPNDS_EQUA 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
LDC I,2
EQU I
LOD I,2,12
LDC I,24
EQU I
AND
NOT
LDA 1,23728
MST 2,4,4
LOD A,2,16
LOC 20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
LOD I,2,20
LDC I,24
LOC 30
EQU I
AND
NOT
AND
NOT
FJP L2
MST 2,4,4
LCA 'S1OPNDS_E001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOC 40
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LOD I,2,12
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
LOC 50
PAR I
CUP I,6,GETFI020
MST 2,12,12
LOD A,2,16
CHK A,0,0
INC A,4
PAR A
LOD I,2,20
CHK I,0,35
PAR I
LOC 60
LDC I,12
CHK I,1,36
PAR I
CUP I,6,GETFI020
EQU I
FJP L3
MST 2,8,8
LOD A,2,8
CHK A,-1,0
PAR A
LOC 70
LOD I,2,12
CHK I,0,35
PAR I
CUP A,4,PTR$O039
CHK A,-1,0
STR A,2,28
MST 2,8,8
LOD A,2,16
CHK A,-1,0
PAR A
LOC 80
LOD I,2,20
CHK I,0,35
PAR I
CUP A,4,PTR$O039
CHK A,-1,0
STR A,2,24
LOD A,2,28
LDC N
EQU A
LOD A,2,24
LOC 90
LDC N
EQU A
IOR
FJP L4
LOD A,2,28
LOD A,2,24
EQU A
STR B,2,0
UJP L5
L4 LAB
LOD A,2,28
LOC 100
CHK A,0,0
INC A,4
LOD A,2,24
CHK A,0,0
INC A,4
EQU M,8
STR B,2,0
L5 LAB
UJP L6
L3 LAB
LDC B,0
STR B,2,0
L6 LAB
LOC 110
RET B
L1 DEF 32
SST I S1OPN041 2 8 0 4 8
LOC 0
S1OPN041 ENT I,2,L1 S1OPND_TEMPL 1 1 1
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LOD I,2,12
LDC I,6
ADI
CHK I,0,35
LOC 10
PAR I
LDC I,6
CHK I,1,36
PAR I
CUP I,6,GETSI021
CHK I,-32,31
STR I,2,16
MST 2,12,12
LOD A,2,8
CHK A,0,0
LOC 20
INC A,4
PAR A
LOD I,2,12
LDC I,0
ADI
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LOC 30
CUP I,6,GETFI020
LDC I,0
EQU I
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LOD I,2,12
LDC I,1
LOC 40
ADI
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
AND
LOC 50
LDC I,4
LOD I,2,16
LEQ I
LOD I,2,16
LDC I,6
INC I,1
LEQ I
AND
LOD I,1,35488
LOD I,2,16
LOC 60
LEQ I
LOD I,2,16
LOD I,1,35484
LEQ I
AND
IOR
AND
FJP L2
LOD I,2,16
STR I,2,0
LOC 70
UJP L3
L2 LAB
LDC I,1
NGI
STR I,2,0
L3 LAB
RET I
L1 DEF 20
SST I GETS1008 2 4 0 0 4
LOC 0
GETS1008 ENT I,2,L1 GETS1OPCODE 1 1 1
LDA 1,6200
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,0
CHK I,0,35
PAR I
LOC 10
LDC I,12
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK J,0,4095
IXA 4
IND I,0
CHK I,0,285
STR I,2,0
RET I
L1 DEF 12
SST A AFTER042 2 4 0 4 4
LOC 0
AFTER042 ENT A,2,L1 AFTER_LAST_X 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
LDC I,0
NEQ I
NOT
FJP L2
MST 2,4,4
LCA 'AFTER_LAS001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOD A,2,8
CHK A,0,0
LOC 20
IND A,0
CHK A,-1,0
STR A,2,12
LOD B,1,35756
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LOC 30
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
AND
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
LOC 40
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
LOC 50
AND
FJP L3
UJP L4
L3 LAB
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
LOC 60
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L5
LOD A,2,12
CHK A,0,0
LOC 70
IND A,0
CHK A,-1,0
STR A,2,12
L5 LAB
L4 LAB
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
LOC 80
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L6
LOD A,2,12
CHK A,0,0
LOC 90
IND A,0
CHK A,-1,0
STR A,2,12
L6 LAB
LOD A,2,12
CHK A,-1,0
STR A,2,0
RET A
L1 DEF 16
SST A JUMPS009 2 4 0 4 4
LOC 0
JUMPS009 ENT A,2,L1 JUMPSKIPDEST 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
ORD
CHK S,0,63
LDC S,(0,0,0,20)
INN
NOT
FJP L2
MST 2,4,4
LCA 'JUMPSKIPD001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOC 20
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,12
LOD A,2,12
CHK A,0,0
IND A,4
LOC 30
CHK A,-1,0
STR A,2,0
RET A
L1 DEF 16
SST A NEXT$043 2 4 0 8 4
LOC 0
NEXT$043 ENT A,2,L1 NEXT_INSTRUC 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
CHK I,0,4
STR I,2,16
LOD I,2,16
LDC I,0
EQU I
FJP L2
LOD A,2,8
CHK A,0,0
IND A,0
CHK A,-1,0
LOC 20
STR A,2,0
UJP L3
L2 LAB
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,12
LOD I,2,16
LOC 30
ORD
CHK S,0,63
LDC S,(0,0,0,20)
INN
FJP L4
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,0
LOC 40
UJP L5
L4 LAB
LOD A,2,12
CHK A,-1,0
STR A,2,0
L5 LAB
L3 LAB
RET A
L1 DEF 20
SST A AFTER044 2 4 0 4 4
LOC 0
AFTER044 ENT A,2,L1 AFTER_FAKEOP 1 1 1
LDC B,1
STR B,2,12
L2 LAB
LOD B,2,12
FJP L3
LOD A,2,8
LDC N
EQU A
FJP L4
LDC B,0
LOC 10
STR B,2,12
UJP L5
L4 LAB
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
LOC 20
IND I,0
LDC I,0
EQU I
FJP L6
LOD A,2,8
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,8
UJP L7
L6 LAB
LOC 30
LDC B,0
STR B,2,12
L7 LAB
L5 LAB
UJP L2
L3 LAB
LOD A,2,8
CHK A,-1,0
STR A,2,0
RET A
L1 DEF 16
SST P INVER045 2 4 0 8 4
LOC 0
INVER045 ENT P,2,L1 INVERT_SKIP 1 1 1
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,8
CHK I,0,35
PAR I
LDC I,4
LOC 10
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,-8,7
STR I,2,12
LDA 1,30596
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
LOC 20
CUP I,2,GETS1008
CHK J,169,200
DEC I,169
IXA 4
IND I,0
CHK I,0,285
STR I,2,16
MST 2,16,16
LOD A,2,8
CHK A,0,0
LOC 30
INC A,4
PAR A
LDC I,0
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,16
LOC 40
CHK J,0,285
IXA 4
IND I,0
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LOC 50
LDC I,8
CHK I,0,35
PAR I
LDC I,4
CHK I,1,36
PAR I
LOD I,2,12
PAR I
CUP P,8,PUTFI022
RET P
L1 DEF 20
SST P FIXSO046 2 8 0 4 8
LOC 0
FIXSO046 ENT P,2,L1 FIXSOP 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
LDC I,4
EQU I
NOT
FJP L2
MST 2,4,4
LCA 'FIXSOP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,4,4
LOD A,2,8
LOC 20
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,16
LOD A,2,16
CHK A,0,0
INC A,4
LOD A,2,12
CHK A,-1,0
LOC 30
STO A
RET P
L1 DEF 20
SST P FIXJO047 2 8 0 4 8
LOC 0
FIXJO047 ENT P,2,L1 FIXJOP 1 1 1
LDA 1,23728
MST 2,4,4
LOD A,2,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LOC 10
LDC I,2
EQU I
NOT
FJP L2
MST 2,4,4
LCA 'FIXJOP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,4,4
LOD A,2,8
LOC 20
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,16
LOD A,2,16
CHK A,0,0
INC A,4
LOD A,2,12
CHK A,-1,0
LOC 30
STO A
RET P
L1 DEF 20
SST P FIXOP048 2 8 0 20 8
LOC 0
FIXOP048 ENT P,2,L1 FIXOPND2 1 1 1
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
LOC 10
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
NOT
FJP L2
MST 2,4,4
LCA 'FIXOPND2 001'
PAR A
LOC 20
CUP P,2,ASSER003
L2 LAB
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,25
CHK I,0,35
PAR I
LDC I,5
LOC 30
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LOC 40
LDC I,30
CHK I,0,35
PAR I
LDC I,6
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
GRT I
AND
LOC 50
FJP L3
MST 2,8,8
LDA 2,16
PAR A
LOD I,2,12
PAR I
CUP P,4,INTEG025
LOD A,2,8
CHK A,0,0
IND A,0
LOC 60
CHK A,0,0
STR A,2,36
LDC I,0
CHK I,0,1
STR I,2,24
LOD A,2,36
IND I,4
LOD I,2,16
ADI
STR I,2,28
LOC 70
LOD I,2,28
LDA 1,4864
LDC I,18
CHK J,0,34
IXA 4
IND I,0
LES I
FJP L4
LOD A,2,36
INC A,4
LOC 80
LOD I,2,28
STO I
UJP L5
L4 LAB
LDC I,1
CHK I,0,1
STR I,2,24
LOD A,2,36
INC A,4
LOD I,2,28
LDA 1,4864
LOC 90
LDC I,18
CHK J,0,34
IXA 4
IND I,0
SBI
STO I
L5 LAB
LOD A,2,36
IND I,8
LOD I,2,20
ADI
LOC 100
LOD I,2,24
ADI
STR I,2,28
LOD A,2,36
INC A,8
LOD I,2,28
LDA 1,4864
LDC I,18
CHK J,0,34
IXA 4
LOC 110
IND I,0
MOD
STO I
UJP L6
L3 LAB
LOD A,2,8
CHK A,0,0
IND A,0
CHK A,0,0
STR A,2,36
MST 2,12,12
LOC 120
LOD A,2,36
INC A,4
PAR A
LDC I,1
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 130
LDC I,0
EQU I
FJP L7
LOD I,2,12
MST 2,12,12
LOD A,2,36
INC A,4
PAR A
LDC I,6
CHK I,0,35
LOC 140
PAR I
LDC I,30
CHK I,1,36
PAR I
CUP I,6,GETSI021
ADI
STR I,2,28
LOD I,2,28
LDC I,-536870912
LES I
LOC 150
LOD I,2,28
LDC I,536870911
GRT I
IOR
FJP L8
MST 2,4,4
LDC I,1
CHK I,0,68
PAR I
CUP P,2,ERROR005
L8 LAB
LOC 160
MST 2,16,16
LOD A,2,36
INC A,4
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,30
CHK I,1,36
PAR I
LOC 170
LOD I,2,28
PAR I
CUP P,8,PUTFI022
UJP L9
L7 LAB
LOD I,2,12
MST 2,12,12
LOD A,2,36
INC A,4
PAR A
LDC I,11
LOC 180
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
CUP I,6,GETSI021
ADI
STR I,2,28
LOD I,2,28
LDC I,-16777216
LOC 190
LES I
LOD I,2,28
LDC I,16777215
GRT I
IOR
FJP L10
MST 2,4,4
LDC I,12
CHK I,0,68
PAR I
LOC 200
CUP P,2,ERROR005
L10 LAB
MST 2,16,16
LOD A,2,36
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
LOC 210
PAR I
LOD I,2,28
PAR I
CUP P,8,PUTFI022
L9 LAB
L6 LAB
LOD B,1,284
FJP L11
LDA 1,13
CSP SIO
LCA ' FIXUP PERFORMED TO PRODUCE THE INSTRUCTION:'
LDC I,49
LOC 220
LDC I,49
CSP WRS
CSP WLN
CSP EIO
LDC I,0
STR I,2,32
MST 2,8,8
LDA 2,32
PAR A
LOD A,2,8
LOC 230
CHK A,-1,0
PAR A
CUP P,4,DISAS007
L11 LAB
RET P
L1 DEF 40
SST P ADD$C050 2 8 0 4 8
LOC 0
ADD$C050 ENT P,2,L1 ADD_CODEPTR_ 1 1 1
MST 2,4,4
LDA 2,16
PAR A
CUP P,2,NEWCO019
LOD A,2,16
CHK A,0,0
INC A,4
LOD A,2,12
CHK A,-1,0
LOC 10
STO A
LOD A,2,16
CHK A,0,0
LOD A,2,8
IND A,8
CHK A,-1,0
STO A
LOD A,2,8
IND A,8
LDC N
LOC 20
EQU A
FJP L2
LOD A,2,8
INC A,4
LOD A,2,16
CHK A,-1,0
STO A
L2 LAB
LOD A,2,8
INC A,8
LOD A,2,16
LOC 30
CHK A,-1,0
STO A
LOD A,2,8
LDC I,1
LOD A,2,8
IND I,0
ADI
CHK I,0,999999
STO I
RET P
L1 DEF 20
SST P ADD$J051 2 12 0 0 12
LOC 0
ADD$J051 ENT P,2,L1 ADD_JUMPLIST 1 1 1
MST 2,8,8
LOD A,2,16
CHK A,-1,0
PAR A
LOD A,2,8
IND A,8
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOC 10
LOD A,2,8
IND A,8
LDC N
EQU A
FJP L2
LOD A,2,8
INC A,4
LOD A,2,16
CHK A,-1,0
STO A
L2 LAB
LOC 20
LOD A,2,8
INC A,8
LOD A,2,16
CHK A,-1,0
STO A
MST 2,8,8
LOD A,2,8
IND A,4
CHK A,-1,0
PAR A
LOC 30
LOD A,2,12
IND A,8
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,12
IND A,8
LDC N
NEQ A
FJP L3
LOC 40
LOD A,2,8
INC A,4
LOD A,2,12
IND A,4
CHK A,-1,0
STO A
L3 LAB
LOD A,2,8
LDC I,1
LOD A,2,8
IND I,0
LOC 50
ADI
LOD A,2,12
IND I,0
ADI
CHK I,0,999999
STO I
RET P
L1 DEF 20
SST P ADD$J052 2 8 0 0 8
LOC 0
ADD$J052 ENT P,2,L1 ADD_JUMP_TO_ 1 1 1
MST 2,8,8
LOD A,2,12
CHK A,-1,0
PAR A
LOD A,2,8
IND A,8
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOC 10
LOD A,2,8
IND A,8
LDC N
EQU A
FJP L2
LOD A,2,8
INC A,4
LOD A,2,12
CHK A,-1,0
STO A
L2 LAB
LOC 20
LOD A,2,8
INC A,8
LOD A,2,12
CHK A,-1,0
STO A
LOD A,2,8
LDC I,1
LOD A,2,8
IND I,0
ADI
LOC 30
CHK I,0,999999
STO I
RET P
L1 DEF 16
SST P JUMP$053 2 8 0 8 8
LOC 0
JUMP$053 ENT P,2,L1 JUMP_TO_TABL 1 1 1
MST 2,12,12
LDA 2,16
PAR A
LOD I,2,12
CHK I,1,99999
PAR I
LDC I,1
CHK I,0,1
PAR I
LOC 10
CUP P,6,UPD$L049
LOD A,2,16
CHK A,0,0
STR A,2,24
LOD A,2,24
IND B,8
NOT
FJP L2
MST 2,8,8
LOD A,2,24
LOC 20
INC A,16
PAR A
LOD A,2,8
CHK A,-1,0
PAR A
CUP P,4,ADD$J052
UJP L3
L2 LAB
MST 2,8,8
LOD A,2,8
CHK A,-1,0
LOC 30
PAR A
LOD A,2,24
IND A,12
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,24
IND B,28
NOT
FJP L4
LOC 40
LOD A,2,24
IND A,12
CHK A,-1,0
STR A,2,20
L5 LAB
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,63
LOC 50
EQU I
MST 2,12,12
LOD A,2,20
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
LOC 60
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
AND
FJP L6
MST 2,16,16
LOD A,2,20
CHK A,0,0
LOC 70
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
PAR I
LOC 80
CUP P,8,PUTFI022
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,20
UJP L5
L6 LAB
L4 LAB
L3 LAB
LOD A,2,24
LOC 90
INC A,28
LDC B,1
STO B
RET P
L1 DEF 28
SST P JUMP$054 2 8 0 4 8
LOC 0
JUMP$054 ENT P,2,L1 JUMP_TO_LABE 1 1 1
MST 2,12,12
LDA 2,16
PAR A
LOD I,2,12
CHK I,1,99999
PAR I
LDC I,1
CHK I,0,1
PAR I
LOC 10
CUP P,6,UPD$L049
LOD A,2,16
CHK A,0,0
STR A,2,20
LOD A,2,20
IND B,8
FJP L2
MST 2,8,8
LOD A,2,8
CHK A,-1,0
LOC 20
PAR A
LOD A,2,20
IND A,12
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
UJP L3
L2 LAB
MST 2,8,8
LOD A,2,20
INC A,16
LOC 30
PAR A
LOD A,2,8
CHK A,-1,0
PAR A
CUP P,4,ADD$J052
L3 LAB
RET P
L1 DEF 24
SST P OPND2055 2 8 0 4 8
LOC 0
OPND2055 ENT P,2,L1 OPND2_RECORD 1 1 1
MST 2,12,12
LDA 2,16
PAR A
LOD I,2,12
CHK I,1,99999
PAR I
LDC I,0
CHK I,0,1
PAR I
LOC 10
CUP P,6,UPD$L049
LOD A,2,16
CHK A,0,0
STR A,2,20
LOD A,2,20
IND B,8
FJP L2
MST 2,8,8
LOD A,2,8
CHK A,-1,0
LOC 20
PAR A
LOD A,2,20
IND I,12
PAR I
CUP P,4,FIXOP048
UJP L3
L2 LAB
MST 2,8,8
LOD A,2,20
INC A,16
PAR A
LOC 30
LOD A,2,8
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
L3 LAB
RET P
L1 DEF 24
SST B ISREG057 2 4 0 0 4
LOC 0
ISREG057 ENT B,2,L1 ISREG 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
AND
LOC 10
STR B,2,0
RET B
L1 DEF 12
SST B IS$T$058 2 4 0 0 4
LOC 0
IS$T$058 ENT B,2,L1 IS_T_REG 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
AND
LOC 10
LDC I,4
LOD A,2,8
IND I,8
LEQ I
LOD A,2,8
IND I,8
LDC I,6
INC I,1
LEQ I
AND
LOC 20
LOD I,1,35488
LOD A,2,8
IND I,8
LEQ I
LOD A,2,8
IND I,8
LOD I,1,35484
LEQ I
AND
IOR
LOC 30
AND
STR B,2,0
RET B
L1 DEF 12
SST B IS$T$059 2 4 0 0 4
LOC 0
IS$T$059 ENT B,2,L1 IS_T_REG_NOT 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
AND
LOC 10
LOD I,1,35488
LOD A,2,8
IND I,8
LEQ I
AND
LOD A,2,8
IND I,8
LOD I,1,35484
LEQ I
AND
LOC 20
STR B,2,0
RET B
L1 DEF 12
SST B ISSHO060 2 4 0 0 4
LOC 0
ISSHO060 ENT B,2,L1 ISSHORTCONST 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,1
EQU I
AND
LOC 10
STR B,2,0
RET B
L1 DEF 12
SST B ISCON061 2 4 0 0 4
LOC 0
ISCON061 ENT B,2,L1 ISCONST 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,1
EQU I
AND
LOC 10
LOD A,2,8
IND I,0
LDC I,1
EQU I
LOD A,2,8
IND I,4
LDC I,1
EQU I
AND
LOD A,2,8
LOC 20
IND I,8
LDC I,0
NEQ I
AND
IOR
STR B,2,0
RET B
L1 DEF 12
SST B EQUAL062 2 8 0 4 8
LOC 0
EQUAL062 ENT B,2,L1 EQUAL_OPERAN 1 1 1
LOD A,2,8
IND I,0
LOD A,2,12
IND I,0
EQU I
LOD A,2,8
IND I,4
LOD A,2,12
IND I,4
LOC 10
EQU I
AND
LOD A,2,8
IND I,8
LOD A,2,12
IND I,8
EQU I
AND
LOD A,2,8
IND I,48
LOC 20
LOD A,2,12
IND I,48
EQU I
AND
LOD A,2,8
IND A,52
LOD A,2,12
IND A,52
EQU A
AND
LOC 30
LOD A,2,8
IND I,12
LOD A,2,12
IND I,12
EQU I
AND
STR B,2,16
LOD B,2,16
FJP L2
LOD A,2,8
LOC 40
IND I,12
ORD
CHK I,0,1
XJP L3
L7 LAB
LOD A,2,8
IND I,28
LOD A,2,12
IND I,28
EQU I
LOD A,2,8
LOC 50
IND I,24
LOD A,2,12
IND I,24
EQU I
AND
LOD A,2,8
IND I,20
LOD A,2,12
IND I,20
EQU I
LOC 60
AND
LOD A,2,8
IND I,16
LOD A,2,12
IND I,16
EQU I
AND
LOD A,2,8
IND I,32
LOD A,2,12
LOC 70
IND I,32
EQU I
AND
LOD A,2,8
IND I,36
LOD A,2,12
IND I,36
EQU I
AND
LOD A,2,8
LOC 80
IND I,40
LOD A,2,12
IND I,40
EQU I
AND
LOD A,2,8
IND I,44
LOD A,2,12
IND I,44
EQU I
LOC 90
AND
STR B,2,16
UJP L6
L8 LAB
LOD A,2,8
INC A,16
LOD A,2,12
INC A,16
EQU M,8
STR B,2,16
UJP L6
L3 DEF 0
L4 DEF 1
L5 LAB
LOC 100
UJP L7
UJP L8
L6 LAB
L2 LAB
LOD B,2,16
STR B,2,0
RET B
L1 DEF 20
SST P REG$O063 2 8 0 0 8
LOC 0
REG$O063 ENT P,2,L1 REG_OPERAND 1 1 1
LOD A,2,8
LDA 1,4456
MOV 56
LOD A,2,8
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,4
LOC 10
LDC I,0
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LOD I,2,12
ORD
CHK I,-32,31
STO I
RET P
L1 DEF 16
SST P IMM$O064 2 8 0 0 8
LOC 0
IMM$O064 ENT P,2,L1 IMM_OPERAND 1 1 1
LDC I,-32
LOD I,2,12
LEQ I
LOD I,2,12
LDC I,31
LEQ I
AND
FJP L2
LOD A,2,8
LOC 10
LDA 1,4400
MOV 56
LOD A,2,8
IND I,4
LDC I,1
EQU I
NOT
FJP L3
MST 2,4,4
LCA 'IMM_OPERA001'
LOC 20
PAR A
CUP P,2,ASSER003
L3 LAB
LOD A,2,8
INC A,8
LOD I,2,12
CHK I,-32,31
STO I
UJP L4
L2 LAB
LOD A,2,8
LDA 1,4344
LOC 30
MOV 56
MST 2,8,8
LOD A,2,8
INC A,16
PAR A
LOD I,2,12
PAR I
CUP P,4,INTEG025
L4 LAB
RET P
L1 DEF 16
SST P REAL$065 2 8 0 0 8
LOC 0
REAL$065 ENT P,2,L1 REAL_IMM_OPE 1 1 1
LOD R,2,12
LDC R,0.0
EQU R
FJP L2
LOD A,2,8
LDA 1,4400
MOV 56
UJP L3
L2 LAB
LOD A,2,8
LOC 10
LDA 1,4344
MOV 56
MST 2,8,8
LOD A,2,8
INC A,16
PAR A
LOD R,2,12
PAR R
CUP P,4,REAL$023
L3 LAB
RET P
L1 DEF 16
SST B IS$RT066 2 4 0 0 4
LOC 0
IS$RT066 ENT B,2,L1 IS_RT 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
AND
LOC 10
LOD A,2,8
IND I,8
LDC I,4
ORD
EQU I
LOD A,2,8
IND I,8
LDC I,6
ORD
EQU I
LOC 20
IOR
AND
STR B,2,0
RET B
L1 DEF 12
SST B IS$RT067 2 4 0 0 4
LOC 0
IS$RT067 ENT B,2,L1 IS_RTA 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
AND
LOC 10
LOD A,2,8
IND I,8
LDC I,4
ORD
EQU I
AND
STR B,2,0
RET B
L1 DEF 12
SST B IS$RT068 2 4 0 0 4
LOC 0
IS$RT068 ENT B,2,L1 IS_RTB 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
AND
LOC 10
LOD A,2,8
IND I,8
LDC I,6
ORD
EQU I
AND
STR B,2,0
RET B
L1 DEF 12
SST B USES$069 2 4 0 0 4
LOC 0
USES$069 ENT B,2,L1 USES_RTA 1 1 1
LOD A,2,8
IND I,4
LDC I,4
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
LOD A,2,8
LOC 10
IND I,8
LDC I,4
ORD
EQU I
AND
IOR
FJP L2
LDC B,1
STR B,2,0
UJP L3
L2 LAB
LOC 20
LOD A,2,8
IND I,0
LDC I,1
NEQ I
LOD A,2,8
IND I,4
LDC I,1
EQU I
LOD A,2,8
IND I,8
LOC 30
LDC I,0
NEQ I
AND
IOR
FJP L4
LDC B,0
STR B,2,0
UJP L5
L4 LAB
LOD A,2,8
IND I,24
LOC 40
LDC I,1
EQU I
LOD A,2,8
IND I,40
LDC I,4
EQU I
AND
STR B,2,0
L5 LAB
L3 LAB
RET B
L1 DEF 12
SST B USES$070 2 4 0 0 4
LOC 0
USES$070 ENT B,2,L1 USES_RTB 1 1 1
LOD A,2,8
IND I,4
LDC I,6
EQU I
LOD A,2,8
IND I,4
LDC I,0
EQU I
LOD A,2,8
LOC 10
IND I,8
LDC I,6
ORD
EQU I
AND
IOR
FJP L2
LDC B,1
STR B,2,0
UJP L3
L2 LAB
LOC 20
LOD A,2,8
IND I,0
LDC I,1
NEQ I
LOD A,2,8
IND I,4
LDC I,1
EQU I
LOD A,2,8
IND I,8
LOC 30
LDC I,0
NEQ I
AND
IOR
FJP L4
LDC B,0
STR B,2,0
UJP L5
L4 LAB
LOD A,2,8
IND I,24
LOC 40
LDC I,1
EQU I
LOD A,2,8
IND I,40
LDC I,6
EQU I
AND
STR B,2,0
L5 LAB
L3 LAB
RET B
L1 DEF 12
SST P EXTEN071 2 8 0 0 8
LOC 0
EXTEN071 ENT P,2,L1 EXTENDED_IMM 1 1 1
LOD A,2,8
LDA 1,4344
MOV 56
MST 2,8,8
LOD A,2,8
INC A,16
PAR A
LOD I,2,12
PAR I
LOC 10
CUP P,4,INTEG025
RET P
L1 DEF 16
SST P REGDI072 2 12 0 0 12
LOC 0
REGDI072 ENT P,2,L1 REGDISP_OPER 1 1 1
MST 2,4,4
LOD I,2,16
CHK I,-16777216,16777215
PAR I
CUP B,2,FITS$056
FJP L2
LOD A,2,8
LDA 1,4456
MOV 56
LOC 10
LOD A,2,8
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,4
LOD I,2,12
ORD
CHK I,0,31
STO I
LOC 20
LOD A,2,8
INC A,8
LOD I,2,16
LDC I,4
DVI
CHK I,-32,31
STO I
UJP L3
L2 LAB
LOD A,2,8
LDA 1,4456
LOC 30
MOV 56
LOD A,2,8
LDC I,1
CHK I,0,1
STO I
LOD A,2,8
INC A,4
LDC I,1
CHK I,0,31
STO I
LOC 40
LOD A,2,8
INC A,8
LDC I,0
CHK I,-32,31
STO I
LOD A,2,8
INC A,12
LDC I,0
CHK I,0,1
STO I
LOC 50
LOD A,2,8
INC A,28
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,24
LDC I,1
CHK I,0,1
STO I
LOC 60
LOD A,2,8
INC A,20
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,16
LDC I,0
CHK I,0,1
STO I
LOC 70
LOD A,2,8
INC A,32
LDC I,0
CHK I,0,3
STO I
LOD A,2,8
INC A,40
LOD I,2,12
ORD
CHK I,0,31
LOC 80
STO I
LOD A,2,8
INC A,44
LOD I,2,16
CHK I,-16777216,16777215
STO I
L3 LAB
RET P
L1 DEF 20
SST P EXTEN073 2 12 0 0 12
LOC 0
EXTEN073 ENT P,2,L1 EXTENDED_REG 1 1 1
LOD A,2,8
LDA 1,4456
MOV 56
LOD A,2,8
LDC I,1
CHK I,0,1
STO I
LOD A,2,8
INC A,4
LOC 10
LDC I,1
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LDC I,0
CHK I,-32,31
STO I
LOD A,2,8
INC A,12
LOC 20
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,28
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,24
LOC 30
LDC I,1
CHK I,0,1
STO I
LOD A,2,8
INC A,20
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,16
LOC 40
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,32
LDC I,0
CHK I,0,3
STO I
LOD A,2,8
INC A,40
LOC 50
LOD I,2,12
ORD
CHK I,0,31
STO I
LOD A,2,8
INC A,44
LOD I,2,16
CHK I,-16777216,16777215
STO I
RET P
L1 DEF 20
SST P EXT$R074 2 12 0 0 12
LOC 0
EXT$R074 ENT P,2,L1 EXT_REGADDR_ 1 1 1
LOD A,2,8
LDA 1,4456
MOV 56
LOD A,2,8
LDC I,1
CHK I,0,1
STO I
LOD A,2,8
INC A,4
LOC 10
LDC I,0
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LOD I,2,12
ORD
CHK I,-32,31
STO I
LOD A,2,8
LOC 20
INC A,12
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,28
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
LOC 30
INC A,24
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,20
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
LOC 40
INC A,16
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,32
LDC I,0
CHK I,0,3
STO I
LOD A,2,8
LOC 50
INC A,36
LOD I,2,16
CHK I,0,1073741823
STO I
RET P
L1 DEF 20
SST P ADDR$075 2 8 0 0 8
LOC 0
ADDR$075 ENT P,2,L1 ADDR_OPERAND 1 1 1
LOD A,2,8
LDA 1,4456
MOV 56
LOD A,2,8
LDC I,1
CHK I,0,1
STO I
LOD A,2,8
INC A,4
LOC 10
LDC I,1
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LDC I,0
CHK I,-32,31
STO I
LOD A,2,8
INC A,12
LOC 20
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,28
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,24
LOC 30
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,20
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,16
LOC 40
LDC I,0
CHK I,0,1
STO I
LOD A,2,8
INC A,32
LDC I,0
CHK I,0,3
STO I
LOD A,2,8
INC A,36
LOC 50
LOD I,2,12
CHK I,0,1073741823
STO I
RET P
L1 DEF 16
SST P ALLOC078 2 4 0 0 4
LOC 0
ALLOC078 ENT P,2,L1 ALLOCGBL 1 1 1
LDA 1,35468
LOD I,2,8
CHK J,32,39
DEC I,32
IXA 1
IND B,0
NOT
FJP L2
MST 2,4,4
LOC 10
LCA 'ALLOCGBL 001'
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 1,35468
LOD I,2,8
CHK J,32,39
DEC I,32
IXA 1
LDC B,0
STO B
LOC 20
RET P
L1 DEF 12
SST P FREEG079 2 4 0 0 4
LOC 0
FREEG079 ENT P,2,L1 FREEGBL_S 1 1 1
LDA 1,35468
LOD I,2,8
CHK J,32,39
DEC I,32
IXA 1
IND B,0
NOT
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'FREEGBL_S001'
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 1,35468
LOD I,2,8
CHK J,32,39
DEC I,32
IXA 1
LDC B,1
LOC 20
STO B
RET P
L1 DEF 12
SST P ALLOC080 2 4 0 0 4
LOC 0
ALLOC080 ENT P,2,L1 ALLOCRG 1 1 1
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L2
MST 2,4,4
LCA 'ALLOCRG 001'
LOC 10
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
LDC B,0
STO B
LDA 1,35340
LOD I,2,8
LOC 20
CHK J,0,31
IXA 4
LDC I,0
CHK I,0,2
STO I
RET P
L1 DEF 12
SST P ALLOC081 2 4 0 0 4
LOC 0
ALLOC081 ENT P,2,L1 ALLOCRP 1 1 1
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
IND B,0
LDA 1,35308
LOD I,2,8
INC I,1
CHK J,0,31
LOC 10
IXA 1
IND B,0
AND
NOT
FJP L2
MST 2,4,4
LCA 'ALLOCRP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 1,35308
LOC 20
LOD I,2,8
CHK J,0,31
IXA 1
LDC B,0
STO B
LDA 1,35308
LOD I,2,8
INC I,1
CHK J,0,31
IXA 1
LOC 30
LDC B,0
STO B
LDA 1,35340
LOD I,2,8
CHK J,0,31
IXA 4
LDC I,1
CHK I,0,2
STO I
LDA 1,35340
LOC 40
LOD I,2,8
INC I,1
CHK J,0,31
IXA 4
LDC I,2
CHK I,0,2
STO I
RET P
L1 DEF 12
SST P FREER082 2 4 0 0 4
LOC 0
FREER082 ENT P,2,L1 FREERG_S 1 1 1
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
IND B,0
NOT
LDA 1,35340
LOD I,2,8
CHK J,0,31
LOC 10
IXA 4
IND I,0
LDC I,2
NEQ I
AND
NOT
FJP L2
MST 2,4,4
LCA 'FREERG_S 001'
PAR A
LOC 20
CUP P,2,ASSER003
L2 LAB
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
LDC B,1
STO B
MST 2,8,8
LDC I,3
CHK I,0,285
LOC 30
PAR I
LOD I,2,8
PAR I
CUP P,4,EMITF076
LDA 1,35340
LOD I,2,8
CHK J,0,31
IXA 4
IND I,0
LDC I,1
LOC 40
EQU I
FJP L3
LDA 1,35308
LOD I,2,8
LDC I,1
ADI
CHK J,0,31
IXA 1
LDC B,1
STO B
LOC 50
MST 2,8,8
LDC I,3
CHK I,0,285
PAR I
LOD I,2,8
LDC I,1
ADI
PAR I
CUP P,4,EMITF076
L3 LAB
RET P
L1 DEF 12
SST P FINDR083 2 0 0 0 0
LOC 0
FINDR083 ENT P,2,L1 FINDRP 1 1 1
LOD I,1,35488
CHK I,0,31
STR I,1,35476
L2 LAB
LOD I,1,35476
LOD I,1,35480
LDC I,2
SBI
LES I
LDA 1,35308
LOC 10
LOD I,1,35476
CHK J,0,31
IXA 1
IND B,0
LDA 1,35308
LOD I,1,35476
LDC I,1
ADI
CHK J,0,31
IXA 1
LOC 20
IND B,0
AND
NOT
AND
FJP L3
LOD I,1,35476
LDC I,1
ADI
CHK I,0,31
STR I,1,35476
LOC 30
UJP L2
L3 LAB
LDA 1,35308
LOD I,1,35476
CHK J,0,31
IXA 1
IND B,0
LDA 1,35308
LOD I,1,35476
LDC I,1
ADI
LOC 40
CHK J,0,31
IXA 1
IND B,0
AND
FJP L4
LDA 1,35308
LOD I,1,35476
CHK J,0,31
IXA 1
LDC B,0
LOC 50
STO B
LDA 1,35308
LOD I,1,35476
LDC I,1
ADI
CHK J,0,31
IXA 1
LDC B,0
STO B
LDA 1,35340
LOC 60
LOD I,1,35476
CHK J,0,31
IXA 4
LDC I,1
CHK I,0,2
STO I
LDA 1,35340
LOD I,1,35476
LDC I,1
ADI
LOC 70
CHK J,0,31
IXA 4
LDC I,2
CHK I,0,2
STO I
LOD I,1,35476
LDC I,1
ADI
LOD I,1,35484
GRT I
LOC 80
FJP L5
LOD I,1,35476
LDC I,1
ADI
CHK I,0,31
STR I,1,35484
LDA 1,5004
LDA 1,5012
MOV 8
LOD I,1,5024
LOC 90
STR I,1,5020
L5 LAB
UJP L6
L4 LAB
MST 2,4,4
LDC I,13
CHK I,0,68
PAR I
CUP P,2,ERROR005
L6 LAB
RET P
L1 DEF 8
SST P FINDR084 2 0 0 8 0
LOC 0
FINDR084 ENT P,2,L1 FINDRG 1 1 1
LOD I,1,35488
CHK I,0,31
STR I,1,35476
L2 LAB
LOD I,1,35476
LOD I,1,35480
LDC I,1
SBI
LES I
LDA 1,35308
LOC 10
LOD I,1,35476
CHK J,0,31
IXA 1
IND B,0
NOT
AND
FJP L3
LOD I,1,35476
LDC I,1
ADI
LOC 20
CHK I,0,31
STR I,1,35476
UJP L2
L3 LAB
LDA 1,35308
LOD I,1,35476
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L4
LOC 30
MST 2,4,4
LDC I,13
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L5
L4 LAB
LOD I,1,35476
CHK I,0,31
STR I,2,12
L6 LAB
LOD I,2,12
LOC 40
LOD I,1,35484
LEQ I
FJP L7
LOD I,2,12
CHK I,0,31
STR I,2,8
L8 LAB
LOD I,2,12
LDC I,1
ADI
CHK I,0,31
LOC 50
STR I,2,12
LOD I,2,12
LOD I,1,35484
GRT I
LDA 1,35308
LOD I,2,12
CHK J,0,31
IXA 1
IND B,0
NOT
LOC 60
IOR
FJP L8
LOD I,2,12
LOD I,2,8
SBI
LDC I,1
EQU I
FJP L9
LOD I,2,8
CHK I,0,31
LOC 70
STR I,1,35476
LOD I,1,35484
LDC I,1
ADI
CHK I,0,31
STR I,2,12
UJP L10
L9 LAB
L11 LAB
LOD I,2,12
LOD I,1,35484
LEQ I
LOC 80
LDA 1,35308
LOD I,2,12
CHK J,0,31
IXA 1
IND B,0
NOT
AND
FJP L12
LOD I,2,12
LDC I,1
LOC 90
ADI
CHK I,0,31
STR I,2,12
UJP L11
L12 LAB
L10 LAB
UJP L6
L7 LAB
LDA 1,35308
LOD I,1,35476
CHK J,0,31
IXA 1
LDC B,0
LOC 100
STO B
LDA 1,35340
LOD I,1,35476
CHK J,0,31
IXA 4
LDC I,0
CHK I,0,2
STO I
LOD I,1,35476
LOD I,1,35484
LOC 110
GRT I
FJP L13
LOD I,1,35476
CHK I,0,31
STR I,1,35484
LDA 1,5004
LDA 1,5012
MOV 8
LOD I,1,5024
STR I,1,5020
L13 LAB
L5 LAB
LOC 120
RET P
L1 DEF 16
SST P MOVE$085 2 0 0 60 0
LOC 0
MOVE$085 ENT P,2,L1 MOVE_AND_FRE 1 1 1
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
NOT
FJP L2
MST 2,4,4
LOC 10
LCA 'MOVE_AND_001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOD B,1,35496
FJP L3
MST 2,0,0
CUP P,0,FINDR083
LDC I,82
CHK I,0,285
STR I,2,8
LOC 20
UJP L4
L3 LAB
MST 2,0,0
CUP P,0,FINDR084
LDC I,75
CHK I,0,285
STR I,2,8
L4 LAB
MST 2,8,8
LDA 2,12
PAR A
LOD I,1,35476
LOC 30
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOD I,2,8
CHK I,0,285
PAR I
LDA 2,12
PAR A
LDA 1,4748
LOC 40
PAR A
CUP P,6,EMITX077
LOD I,1,35492
LOD I,1,39472
LEQ I
NOT
FJP L5
MST 2,4,4
LCA 'MOVE_AND_002'
PAR A
LOC 50
CUP P,2,ASSER003
L5 LAB
LDA 1,35760
LOD I,1,35492
CHK J,-1,30
INC I,1
IXA 116
STR A,2,68
LOD A,2,68
IND I,60
LDC I,0
LOC 60
EQU I
FJP L6
LOD A,2,68
IND I,64
LDC I,6
EQU I
FJP L7
LOD A,2,68
INC A,64
LOD I,1,35476
LOC 70
CHK I,0,31
STO I
L7 LAB
L6 LAB
LOD A,2,68
IND I,84
LDC I,0
EQU I
FJP L8
LOD A,2,68
IND I,88
LDC I,6
LOC 80
EQU I
FJP L9
LOD A,2,68
INC A,88
LOD I,1,35476
CHK I,0,31
STO I
L9 LAB
L8 LAB
LOD A,2,68
IND I,104
LDC I,0
LOC 90
EQU I
FJP L10
LOD A,2,68
IND I,108
LDC I,6
EQU I
FJP L11
LOD A,2,68
INC A,108
LOD I,1,35476
LOC 100
CHK I,0,31
STO I
L11 LAB
L10 LAB
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,FREER082
RET P
L1 DEF 72
SST I CURRE086 2 0 0 0 0
LOC 0
CURRE086 ENT I,2,L1 CURRENT_PARM 1 1 1
LOD I,1,35488
LDC I,8
SBI
CHK I,0,10
STR I,2,0
RET I
L1 DEF 8
SST B IS$PA087 2 4 0 0 4
LOC 0
IS$PA087 ENT B,2,L1 IS_PARMREG 1 1 1
LDC I,8
LOD I,2,8
LEQ I
LOD I,2,8
LOD I,1,35488
LES I
AND
STR B,2,0
RET B
L1 DEF 12
SST P CHECK088 2 0 0 0 0
LOC 0
CHECK088 ENT P,2,L1 CHECK_DSP_TM 1 1 1
LOD I,1,35480
LOD I,1,35484
LEQ I
FJP L2
MST 2,4,4
LDC I,42
CHK I,0,68
PAR I
CUP P,2,ERROR005
L2 LAB
LOC 10
RET P
L1 DEF 8
SST P RESER089 2 4 0 4 4
LOC 0
RESER089 ENT P,2,L1 RESERVE_PARM 1 1 1
LOD I,1,35488
CHK I,0,31
STR I,2,12
LDC I,8
LOD I,2,8
ADI
LDC I,1
SBI
CHK I,0,31
LOC 10
STR I,2,16
LOD I,2,12
LOD I,2,16
LEQ I
FJP L3
L2 LAB
LDA 1,35308
LOD I,2,12
CHK J,0,31
IXA 1
IND B,0
LOC 20
NOT
FJP L4
MST 2,4,4
LCA 'RESERVE_P001'
PAR A
CUP P,2,ASSER003
L4 LAB
LOD I,2,12
LOD I,2,16
NEQ I
FJP L3
LOC 30
LOD I,2,12
INC I,1
CHK I,0,31
STR I,2,12
UJP L2
L3 LAB
LDC I,8
LOD I,2,8
ADI
CHK I,0,31
STR I,1,35488
LOC 40
MST 2,8,8
LOD I,1,35484
PAR I
LOD I,1,35488
LDC I,1
SBI
PAR I
CUP I,4,MAX00030
CHK I,0,31
STR I,1,35484
LOC 50
MST 2,0,0
CUP P,0,CHECK088
RET P
L1 DEF 20
SST P FREED090 2 4 0 0 4
LOC 0
FREED090 ENT P,2,L1 FREEDATUMREG 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,0
EQU I
FJP L2
LOC 10
LOD I,1,35488
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LEQ I
LDA 1,35760
LOD I,2,8
LOC 20
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 30
INC I,1
IXA 116
IND I,64
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L3
MST 2,4,4
LDA 1,35760
LOC 40
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
CHK I,0,31
PAR I
CUP P,2,FREER082
L3 LAB
L2 LAB
LDA 1,35760
LOD I,2,8
LOC 50
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,1
GEQ I
FJP L4
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 60
INC I,1
IXA 116
IND I,84
LDC I,0
EQU I
FJP L5
LOD I,1,35488
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 70
INC I,1
IXA 116
IND I,88
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LOC 80
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
CHK S,0,63
LOC 90
LDC S,(0,0,0,80)
INN
IOR
FJP L6
MST 2,4,4
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 100
IND I,88
CHK I,0,31
PAR I
CUP P,2,FREER082
L6 LAB
L5 LAB
L4 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LOC 110
LDC I,2
EQU I
FJP L7
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,104
LDC I,0
LOC 120
EQU I
FJP L8
LOD I,1,35488
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
LEQ I
LOC 130
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOC 140
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L9
LOC 150
MST 2,4,4
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
CHK I,0,31
PAR I
CUP P,2,FREER082
L9 LAB
L8 LAB
L7 LAB
LOC 160
RET P
L1 DEF 12
SST P FREER091 2 8 0 0 8
LOC 0
FREER091 ENT P,2,L1 FREEREGSBUTO 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,0
EQU I
FJP L2
LOC 10
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOD I,2,12
NEQ I
FJP L3
LOD I,1,35488
LOC 20
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 30
INC I,1
IXA 116
IND I,64
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 40
IXA 116
IND I,64
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L4
MST 2,4,4
LDA 1,35760
LOD I,2,8
LOC 50
CHK J,-1,30
INC I,1
IXA 116
IND I,64
CHK I,0,31
PAR I
CUP P,2,FREER082
L4 LAB
L3 LAB
L2 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 60
INC I,1
IXA 116
IND I,72
LDC I,1
GEQ I
FJP L5
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 70
IXA 116
IND I,84
LDC I,0
EQU I
FJP L6
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 80
IND I,88
LOD I,2,12
NEQ I
FJP L7
LOD I,1,35488
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 90
IND I,88
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LOD I,1,35484
LEQ I
LOC 100
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
CHK S,0,63
LDC S,(0,0,0,80)
INN
LOC 110
IOR
FJP L8
MST 2,4,4
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
CHK I,0,31
LOC 120
PAR I
CUP P,2,FREER082
L8 LAB
L7 LAB
L6 LAB
L5 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,2
EQU I
LOC 130
FJP L9
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,104
LDC I,0
EQU I
FJP L10
LOC 140
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
LOD I,2,12
NEQ I
FJP L11
LOD I,1,35488
LOC 150
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 160
INC I,1
IXA 116
IND I,108
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 170
IXA 116
IND I,108
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L12
MST 2,4,4
LDA 1,35760
LOD I,2,8
LOC 180
CHK J,-1,30
INC I,1
IXA 116
IND I,108
CHK I,0,31
PAR I
CUP P,2,FREER082
L12 LAB
L11 LAB
L10 LAB
L9 LAB
RET P
L1 DEF 16
SST P FREER092 2 8 0 8 8
LOC 0
FREER092 ENT P,2,L1 FREERGSBUTSO 1 1 1
LDC S,(0,0,0,0)
STR S,2,16
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,1
LOC 10
EQU I
FJP L2
LOD S,2,16
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
CHK S,0,63
LOC 20
SGS
UNI
STR S,2,16
L2 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,84
LDC I,1
LOC 30
EQU I
FJP L3
LOD S,2,16
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
CHK S,0,63
LOC 40
SGS
UNI
STR S,2,16
L3 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,104
LDC I,1
LOC 50
EQU I
FJP L4
LOD S,2,16
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
CHK S,0,63
LOC 60
SGS
UNI
STR S,2,16
L4 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,0
LOC 70
EQU I
FJP L5
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
CHK S,0,63
LOD S,2,16
LOC 80
INN
NOT
FJP L6
LOD I,1,35488
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOC 90
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOD I,1,35484
LEQ I
AND
LOC 100
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
LOC 110
FJP L7
MST 2,4,4
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
CHK I,0,31
PAR I
LOC 120
CUP P,2,FREER082
L7 LAB
L6 LAB
L5 LAB
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,1
GEQ I
FJP L8
LOC 130
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,84
LDC I,0
EQU I
FJP L9
LDA 1,35760
LOC 140
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
CHK S,0,63
LOD S,2,16
INN
NOT
FJP L10
LOC 150
LOD I,1,35488
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LEQ I
LDA 1,35760
LOD I,2,8
LOC 160
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 170
INC I,1
IXA 116
IND I,88
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L11
MST 2,4,4
LDA 1,35760
LOC 180
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
CHK I,0,31
PAR I
CUP P,2,FREER082
L11 LAB
L10 LAB
L9 LAB
L8 LAB
LDA 1,35760
LOD I,2,8
LOC 190
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,2
EQU I
FJP L12
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 200
INC I,1
IXA 116
IND I,104
LDC I,0
EQU I
FJP L13
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 210
IXA 116
IND I,108
CHK S,0,63
LOD S,2,16
INN
NOT
FJP L14
LOD I,1,35488
LDA 1,35760
LOD I,2,8
LOC 220
CHK J,-1,30
INC I,1
IXA 116
IND I,108
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 230
IND I,108
LOD I,1,35484
LEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,108
LOC 240
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L15
MST 2,4,4
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 250
IXA 116
IND I,108
CHK I,0,31
PAR I
CUP P,2,FREER082
L15 LAB
L14 LAB
L13 LAB
L12 LAB
RET P
L1 DEF 24
SST P FREEV093 2 4 0 0 4
LOC 0
FREEV093 ENT P,2,L1 FREEVPAREG 1 1 1
LOD A,2,8
IND I,8
LDC I,0
EQU I
FJP L2
LOD I,1,35488
LOD A,2,8
IND I,12
LEQ I
LOC 10
LOD A,2,8
IND I,12
LOD I,1,35484
LEQ I
AND
LOD A,2,8
IND I,12
CHK S,0,63
LDC S,(0,0,0,80)
INN
LOC 20
IOR
FJP L3
MST 2,4,4
LOD A,2,8
IND I,12
CHK I,0,31
PAR I
CUP P,2,FREER082
L3 LAB
L2 LAB
RET P
L1 DEF 12
SST P FREEV094 2 8 0 0 8
LOC 0
FREEV094 ENT P,2,L1 FREEVPARGUNL 1 1 1
LOD A,2,8
IND I,8
LDC I,0
EQU I
FJP L2
LOD A,2,8
IND I,12
LOD I,2,12
NEQ I
LOC 10
FJP L3
LOD I,1,35488
LOD A,2,8
IND I,12
LEQ I
LOD A,2,8
IND I,12
LOD I,1,35484
LEQ I
AND
LOC 20
LOD A,2,8
IND I,12
CHK S,0,63
LDC S,(0,0,0,80)
INN
IOR
FJP L4
MST 2,4,4
LOD A,2,8
IND I,12
LOC 30
CHK I,0,31
PAR I
CUP P,2,FREER082
L4 LAB
L3 LAB
L2 LAB
RET P
L1 DEF 16
SST P FREE$095 2 0 0 4 0
LOC 0
FREE$095 ENT P,2,L1 FREE_TEMP_RE 1 1 1
LDA 1,35308
LDC I,4
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L2
MST 2,4,4
LDC I,4
LOC 10
CHK I,0,31
PAR I
CUP P,2,FREER082
L2 LAB
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L3
LOC 20
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,FREER082
L3 LAB
LOD I,1,35488
CHK I,0,31
STR I,2,8
LOD I,1,35484
CHK I,0,31
LOC 30
STR I,2,12
LOD I,2,8
LOD I,2,12
LEQ I
FJP L5
L4 LAB
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
IND B,0
LOC 40
NOT
FJP L6
MST 2,4,4
LOD I,2,8
CHK I,0,31
PAR I
CUP P,2,FREER082
L6 LAB
LOD I,2,8
LOD I,2,12
NEQ I
LOC 50
FJP L5
LOD I,2,8
INC I,1
CHK I,0,31
STR I,2,8
UJP L4
L5 LAB
RET P
L1 DEF 16
SST P BUILD096 2 16 0 0 16
LOC 0
BUILD096 ENT P,2,L1 BUILD_CW_OPE 1 1 1
MST 2,16,16
LOD A,2,8
PAR A
LOD I,2,20
LDC I,0
ADI
CHK I,0,35
PAR I
LDC I,1
LOC 10
CHK I,1,36
PAR I
LOD A,2,16
IND I,0
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,8
PAR A
LOD I,2,20
LOC 20
LDC I,1
ADI
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
LOD A,2,16
IND I,4
PAR I
LOC 30
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,8
PAR A
LOD I,2,20
LDC I,6
ADI
CHK I,0,35
PAR I
LDC I,6
LOC 40
CHK I,1,36
PAR I
LOD A,2,16
IND I,8
PAR I
CUP P,8,PUTFI022
LOD A,2,16
IND I,48
LDC I,0
NEQ I
LOC 50
FJP L2
LOD A,2,16
IND I,0
LDC I,1
EQU I
NOT
FJP L3
MST 2,4,4
LCA 'BUILD_CW_001'
PAR A
LOC 60
CUP P,2,ASSER003
L3 LAB
LOD A,2,16
IND I,48
ORD
CHK I,0,5
XJP L4
L8 LAB
MST 2,8,8
LDA 1,440
PAR A
LOD A,2,12
LOC 70
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
UJP L7
L9 LAB
MST 2,8,8
LDA 1,416
PAR A
LOD A,2,12
CHK A,-1,0
PAR A
LOC 80
CUP P,4,ADD$C050
UJP L7
L10 LAB
MST 2,8,8
LDA 1,428
PAR A
LOD A,2,12
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
UJP L7
L11 LAB
LOC 90
MST 2,8,8
LDA 1,404
PAR A
LOD A,2,12
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
UJP L7
L12 LAB
MST 2,8,8
LOD A,2,16
LOC 100
IND A,52
CHK A,0,0
INC A,8
PAR A
LOD A,2,12
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
UJP L7
L4 DEF 1
L5 DEF 5
L6 LAB
UJP L8
LOC 110
UJP L9
UJP L10
UJP L12
UJP L11
L7 LAB
L2 LAB
LOD A,2,16
IND I,0
LDC I,1
EQU I
FJP L13
LOD A,2,16
LOC 120
IND I,12
LDC I,1
EQU I
FJP L14
LOD A,2,16
IND I,8
LDC I,0
GRT I
LOD A,2,16
IND I,4
LOC 130
LDC I,1
EQU I
AND
NOT
FJP L15
MST 2,4,4
LCA 'BUILD_CW_002'
PAR A
CUP P,2,ASSER003
L15 LAB
LOD A,2,12
LOC 140
CHK A,0,0
INC A,4
LOD A,2,16
INC A,16
MOV 8
UJP L16
L14 LAB
LOD A,2,16
IND I,8
LDC I,0
GRT I
LOC 150
LOD A,2,16
IND I,4
LDC I,1
EQU I
AND
NOT
NOT
FJP L17
MST 2,4,4
LCA 'BUILD_CW_003'
LOC 160
PAR A
CUP P,2,ASSER003
L17 LAB
MST 2,16,16
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LDC I,0
CHK I,0,35
PAR I
LOC 170
LDC I,1
CHK I,1,36
PAR I
LOD A,2,16
IND I,28
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,12
CHK A,0,0
LOC 180
INC A,4
PAR A
LDC I,1
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LOD A,2,16
IND I,24
LOC 190
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LDC I,2
CHK I,0,35
PAR I
LOC 200
LDC I,1
CHK I,1,36
PAR I
LOD A,2,16
IND I,20
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,12
CHK A,0,0
LOC 210
INC A,4
PAR A
LDC I,3
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LOD A,2,16
IND I,16
LOC 220
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LDC I,4
CHK I,0,35
PAR I
LOC 230
LDC I,2
CHK I,1,36
PAR I
LOD A,2,16
IND I,32
PAR I
CUP P,8,PUTFI022
LOD A,2,16
IND I,24
LDC I,0
LOC 240
EQU I
FJP L18
MST 2,16,16
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LDC I,6
CHK I,0,35
PAR I
LOC 250
LDC I,30
CHK I,1,36
PAR I
LOD A,2,16
IND I,36
PAR I
CUP P,8,PUTFI022
UJP L19
L18 LAB
MST 2,16,16
LOD A,2,12
LOC 260
CHK A,0,0
INC A,4
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
LOD A,2,16
LOC 270
IND I,40
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LDC I,11
CHK I,0,35
LOC 280
PAR I
LDC I,25
CHK I,1,36
PAR I
LOD A,2,16
IND I,44
PAR I
CUP P,8,PUTFI022
L19 LAB
L16 LAB
L13 LAB
RET P
L1 DEF 24
SST P EMIT$097 2 8 0 4 8
LOC 0
EMIT$097 ENT P,2,L1 EMIT_INSTR_O 1 1 1
LOD A,1,324
LDC N
EQU A
FJP L2
LOD A,1,328
CHK A,-1,0
STR A,1,324
UJP L3
L2 LAB
LOD A,1,320
LOC 10
CHK A,0,0
LOD A,1,328
CHK A,-1,0
STO A
L3 LAB
LOD A,1,328
CHK A,-1,0
STR A,1,320
LOD A,1,328
CHK A,0,0
LDC N
LOC 20
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
MST 2,4,4
LDA 2,16
PAR A
LOC 30
CUP P,2,NEWCO019
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LOD A,2,16
CHK A,-1,0
PAR A
LOD A,2,12
LOC 40
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP P,8,BUILD096
LOD A,2,12
IND I,0
LDC I,1
EQU I
FJP L4
LOC 50
LOD A,1,320
CHK A,0,0
LOD A,2,16
CHK A,-1,0
STO A
LOD A,2,16
CHK A,-1,0
STR A,1,320
LOD A,2,16
CHK A,0,0
LOC 60
LDC N
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
MST 2,4,4
LDA 2,16
LOC 70
PAR A
CUP P,2,NEWCO019
L4 LAB
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LOD A,2,16
CHK A,-1,0
PAR A
LOC 80
LOD A,2,8
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP P,8,BUILD096
LOD A,2,8
IND I,0
LDC I,1
EQU I
LOC 90
FJP L5
LOD A,1,320
CHK A,0,0
LOD A,2,16
CHK A,-1,0
STO A
LOD A,2,16
CHK A,-1,0
STR A,1,320
LOD A,2,16
LOC 100
CHK A,0,0
LDC N
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
MST 2,4,4
LOC 110
LDA 2,16
PAR A
CUP P,2,NEWCO019
L5 LAB
LOD A,2,16
CHK A,-1,0
STR A,1,328
RET P
L1 DEF 20
SST P INSER098 2 16 8 16 16
LOC 0
INSER098 ENT P,2,L1 INSERT_INSTR 1 1 1
LDA 2,24
LOD A,2,12
MOV 8
MST 2,4,4
LDA 2,44
PAR A
CUP P,2,NEWCO019
LOD A,2,8
IND A,0
LOC 10
LDC N
EQU A
FJP L2
LOD A,1,324
CHK A,-1,0
STR A,2,40
LOD A,2,44
CHK A,-1,0
STR A,1,324
UJP L3
L2 LAB
LOC 20
LOD A,1,324
LDC N
NEQ A
NOT
FJP L4
MST 2,4,4
LCA 'INSERT_IN001'
PAR A
CUP P,2,ASSER003
L4 LAB
LOD A,2,8
LOC 30
IND A,0
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,40
LOD A,2,8
IND A,0
CHK A,0,0
LOD A,2,44
CHK A,-1,0
LOC 40
STO A
L3 LAB
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
LOD A,2,44
CHK A,-1,0
STR A,2,36
LOD A,2,20
LOC 50
IND I,0
LDC I,1
EQU I
FJP L5
MST 2,4,4
LDA 2,32
PAR A
CUP P,2,NEWCO019
LOD A,2,36
CHK A,0,0
LOC 60
LOD A,2,32
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
LOD A,2,32
CHK A,-1,0
LOC 70
STR A,2,36
UJP L6
L5 LAB
LDC N
CHK A,-1,0
STR A,2,32
L6 LAB
MST 2,16,16
LDA 2,24
PAR A
LOD A,2,32
CHK A,-1,0
LOC 80
PAR A
LOD A,2,20
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP P,8,BUILD096
LOD A,2,16
IND I,0
LDC I,1
LOC 90
EQU I
FJP L7
MST 2,4,4
LDA 2,32
PAR A
CUP P,2,NEWCO019
LOD A,2,36
CHK A,0,0
LOD A,2,32
CHK A,-1,0
LOC 100
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
LOD A,2,32
CHK A,-1,0
STR A,2,36
UJP L8
L7 LAB
LOC 110
LDC N
CHK A,-1,0
STR A,2,32
L8 LAB
MST 2,16,16
LDA 2,24
PAR A
LOD A,2,32
CHK A,-1,0
PAR A
LOD A,2,16
LOC 120
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP P,8,BUILD096
LOD A,2,44
CHK A,0,0
INC A,4
LDA 2,24
MOV 8
LOC 130
LOD A,2,36
CHK A,0,0
LOD A,2,40
CHK A,-1,0
STO A
LOD A,1,320
LOD A,2,8
IND A,0
EQU A
FJP L9
LOC 140
LOD A,2,36
CHK A,-1,0
STR A,1,320
L9 LAB
LOD A,2,8
LOD A,2,36
CHK A,-1,0
STO A
RET P
L1 DEF 48
SST P EMITF076 2 8 0 0 8
LOC 0
EMITF076 ENT P,2,L1 EMITFAKEINST 1 1 1
LDA 1,23728
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LDC I,0
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'EMITFAKEI001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,0
LOC 20
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LOC 30
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LOC 40
LDC I,24
CHK I,1,36
PAR I
LOD I,2,12
PAR I
CUP P,8,PUTFI022
LOD I,1,316
LDC I,0
EQU I
FJP L3
LOC 50
LOD A,1,328
CHK A,-1,0
STR A,1,324
UJP L4
L3 LAB
LOD A,1,320
CHK A,0,0
LOD A,1,328
CHK A,-1,0
STO A
L4 LAB
LOD A,1,328
LOC 60
CHK A,0,0
LDC N
CHK A,-1,0
STO A
LOD A,1,328
CHK A,-1,0
STR A,1,320
LOD I,1,316
LDC I,1
ADI
LOC 70
CHK I,0,999999
STR I,1,316
MST 2,4,4
LDA 1,328
PAR A
CUP P,2,NEWCO019
RET P
L1 DEF 16
SST P INSER099 2 24 0 12 24
LOC 0
INSER099 ENT P,2,L1 INSERTSOP 1 1 1
LDA 1,23728
LOD I,2,12
CHK J,0,285
IXA 4
IND I,0
LDC I,4
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'INSERTSOP001'
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 2,32
LDA 1,4568
MOV 8
MST 2,16,16
LDA 2,32
PAR A
LOC 20
LDC I,0
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,12
CHK J,0,285
IXA 4
LOC 30
IND I,0
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LDA 2,32
PAR A
LDC I,8
CHK I,0,35
PAR I
LDC I,4
LOC 40
CHK I,1,36
PAR I
LOD I,2,16
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LDA 2,8
PAR A
LDA 2,32
PAR A
LOC 50
LOD A,2,20
PAR A
LOD A,2,24
PAR A
CUP P,8,INSER098
MST 2,4,4
LDA 2,40
PAR A
CUP P,2,NEWCO019
LOD A,2,40
LOC 60
CHK A,0,0
LOD A,2,8
CHK A,0,0
IND A,0
CHK A,-1,0
STO A
LOD A,2,8
CHK A,0,0
LOD A,2,40
CHK A,-1,0
LOC 70
STO A
LOD A,2,40
CHK A,0,0
INC A,4
LOD A,2,28
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
LOC 80
CHK I,0,999999
STR I,1,316
LOD A,2,40
CHK A,0,0
IND A,0
LDC N
EQU A
FJP L3
LOD A,2,40
CHK A,-1,0
LOC 90
STR A,1,320
L3 LAB
RET P
L1 DEF 44
SST P INSER100 2 24 0 12 24
LOC 0
INSER100 ENT P,2,L1 INSERTJOP 1 1 1
LDA 1,23728
LOD I,2,12
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'INSERTJOP001'
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 2,32
LDA 1,4568
MOV 8
MST 2,16,16
LDA 2,32
PAR A
LOC 20
LDC I,0
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,12
CHK J,0,285
IXA 4
LOC 30
IND I,0
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LDA 2,32
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
LOC 40
CHK I,1,36
PAR I
LOD I,2,16
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LDA 2,8
PAR A
LDA 2,32
PAR A
LOC 50
LOD A,2,20
PAR A
LOD A,2,24
PAR A
CUP P,8,INSER098
MST 2,4,4
LDA 2,40
PAR A
CUP P,2,NEWCO019
LOD A,2,40
LOC 60
CHK A,0,0
LOD A,2,8
CHK A,0,0
IND A,0
CHK A,-1,0
STO A
LOD A,2,8
CHK A,0,0
LOD A,2,40
CHK A,-1,0
LOC 70
STO A
LOD A,2,40
CHK A,0,0
INC A,4
LOD A,2,28
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
LOC 80
CHK I,0,999999
STR I,1,316
LOD A,2,40
CHK A,0,0
IND A,0
LDC N
EQU A
FJP L3
LOD A,2,40
CHK A,-1,0
LOC 90
STR A,1,320
L3 LAB
RET P
L1 DEF 44
SST P INSER101 2 16 0 8 16
LOC 0
INSER101 ENT P,2,L1 INSERTXOP 1 1 1
LDA 1,23728
LOD I,2,12
CHK J,0,285
IXA 4
IND I,0
LDC I,3
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'INSERTXOP001'
PAR A
CUP P,2,ASSER003
L2 LAB
LDA 2,24
LDA 1,4568
MOV 8
MST 2,16,16
LDA 2,24
PAR A
LOC 20
LDC I,0
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,12
CHK J,0,285
IXA 4
LOC 30
IND I,0
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LDA 2,8
PAR A
LDA 2,24
PAR A
LOD A,2,16
PAR A
LOC 40
LOD A,2,20
PAR A
CUP P,8,INSER098
RET P
L1 DEF 32
SST P EMIT$102 2 8 0 0 8
LOC 0
EMIT$102 ENT P,2,L1 EMIT_S1WORD 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
FJP L2
MST 2,4,4
LOD A,2,8
INC A,8
PAR A
LOC 10
CUP P,2,NEWCO019
LOD A,2,8
INC A,4
LOD A,2,8
IND A,8
CHK A,-1,0
STO A
LOD A,2,8
LDC I,1
CHK I,0,999999
LOC 20
STO I
UJP L3
L2 LAB
MST 2,4,4
LOD A,2,8
IND A,4
CHK A,0,0
PAR A
CUP P,2,NEWCO019
LOD A,2,8
INC A,4
LOC 30
LOD A,2,8
IND A,4
CHK A,0,0
IND A,0
CHK A,-1,0
STO A
LOD A,2,8
LOD A,2,8
IND I,0
LDC I,1
LOC 40
ADI
CHK I,0,999999
STO I
L3 LAB
LOD A,2,8
IND A,4
CHK A,0,0
LDC N
CHK A,-1,0
STO A
LOD A,2,8
LOC 50
IND A,4
CHK A,0,0
INC A,4
LOD A,2,12
MOV 8
RET P
L1 DEF 16
SST P EMIT$103 2 8 0 0 8
LOC 0
EMIT$103 ENT P,2,L1 EMIT_ZEROS1W 1 1 1
LOD A,2,8
IND I,0
LDC I,0
EQU I
FJP L2
MST 2,4,4
LOD A,2,8
INC A,8
PAR A
LOC 10
CUP P,2,NEWCO019
LOD A,2,8
INC A,4
LOD A,2,8
IND A,8
CHK A,-1,0
STO A
LOD A,2,8
LDC I,1
CHK I,0,999999
LOC 20
STO I
UJP L3
L2 LAB
MST 2,4,4
LOD A,2,8
IND A,4
CHK A,0,0
PAR A
CUP P,2,NEWCO019
LOD A,2,8
INC A,4
LOC 30
LOD A,2,8
IND A,4
CHK A,0,0
IND A,0
CHK A,-1,0
STO A
LOD A,2,8
LOD A,2,8
IND I,0
LDC I,1
LOC 40
ADI
CHK I,0,999999
STO I
L3 LAB
LOD A,2,8
IND A,4
CHK A,0,0
LDC N
CHK A,-1,0
STO A
LOD A,2,8
LOC 50
IND A,4
CHK A,0,0
INC A,4
LDA 1,4568
MOV 8
LOD A,2,12
LOD A,2,8
IND A,4
CHK A,-1,0
STO A
LOC 60
RET P
L1 DEF 16
SST P EMITS104 2 20 0 0 20
LOC 0
EMITS104 ENT P,2,L1 EMITSOP 1 1 1
LDA 1,23728
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LDC I,4
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'EMITSOP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,0
LOC 20
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LOC 30
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,8
CHK I,0,35
PAR I
LOC 40
LDC I,4
CHK I,1,36
PAR I
LOD I,2,12
PAR I
CUP P,8,PUTFI022
MST 2,8,8
LOD A,2,16
PAR A
LOD A,2,20
LOC 50
PAR A
CUP P,4,EMIT$097
LOD A,1,320
CHK A,0,0
LOD A,1,328
CHK A,-1,0
STO A
LOD A,1,328
CHK A,0,0
LDC N
LOC 60
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
LOD A,1,328
CHK A,-1,0
STR A,1,320
LOC 70
MST 2,4,4
LDA 1,328
PAR A
CUP P,2,NEWCO019
LOD A,1,320
CHK A,0,0
INC A,4
LOD A,2,24
CHK A,-1,0
STO A
LOC 80
RET P
L1 DEF 28
SST P EMITJ105 2 20 0 0 20
LOC 0
EMITJ105 ENT P,2,L1 EMITJOP 1 1 1
LDA 1,23728
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'EMITJOP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,0
LOC 20
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LOC 30
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LOC 40
LDC I,1
CHK I,1,36
PAR I
LOD I,2,12
PAR I
CUP P,8,PUTFI022
MST 2,8,8
LOD A,2,16
PAR A
LOD A,2,20
LOC 50
PAR A
CUP P,4,EMIT$097
LOD A,1,320
CHK A,0,0
LOD A,1,328
CHK A,-1,0
STO A
LOD A,1,328
CHK A,0,0
LDC N
LOC 60
CHK A,-1,0
STO A
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
LOD A,1,328
CHK A,-1,0
STR A,1,320
LOC 70
MST 2,4,4
LDA 1,328
PAR A
CUP P,2,NEWCO019
LOD A,1,320
CHK A,0,0
INC A,4
LOD A,2,24
CHK A,-1,0
STO A
LOC 80
RET P
L1 DEF 28
SST P EMITT106 2 16 0 0 16
LOC 0
EMITT106 ENT P,2,L1 EMITTOP 1 1 1
LDA 1,23728
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LDC I,1
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'EMITTOP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,0
LOC 20
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LOC 30
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,10
CHK I,0,35
PAR I
LOC 40
LDC I,2
CHK I,1,36
PAR I
LOD I,2,12
PAR I
CUP P,8,PUTFI022
MST 2,8,8
LOD A,2,16
PAR A
LOD A,2,20
LOC 50
PAR A
CUP P,4,EMIT$097
RET P
L1 DEF 24
SST P EMITX077 2 12 0 52 12
LOC 0
EMITX077 ENT P,2,L1 EMITXOP 1 1 1
LDA 1,23728
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LDC I,3
EQU I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'EMITXOP 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,16,16
LOD A,1,328
CHK A,0,0
INC A,4
PAR A
LDC I,0
LOC 20
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LOD I,2,8
CHK J,0,285
IXA 4
IND I,0
LOC 30
PAR I
CUP P,8,PUTFI022
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,16
PAR A
CUP P,4,EMIT$097
RET P
L1 DEF 72
SST P ALLOC107 2 32 0 60 32
LOC 0
ALLOC107 ENT P,2,L1 ALLOC_AND_EM 1 1 1
LDA 1,22584
LOD I,2,12
CHK J,0,285
IXA 4
IND I,0
LDC I,0
NEQ I
NOT
FJP L2
LOC 10
MST 2,4,4
LCA 'ALLOC_AND001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,4,4
LOD A,2,16
PAR A
CUP B,2,IS$T$059
LOD B,2,24
LOD B,2,28
LOC 20
LEQ B
AND
FJP L3
MST 2,4,4
LOD A,2,20
PAR A
CUP B,2,IS$T$059
LOD B,2,24
LOD B,2,32
LEQ B
LOC 30
AND
LOD A,2,20
IND I,8
LOD A,2,16
IND I,8
LES I
AND
FJP L4
LOD A,2,8
LOD A,2,20
LOC 40
IND I,8
CHK I,0,31
STO I
MST 2,16,16
LDA 1,22584
LOD I,2,12
CHK J,0,285
IXA 4
IND I,0
CHK I,0,285
LOC 50
PAR I
LDC I,0
CHK I,0,3
PAR I
LOD A,2,20
PAR A
LOD A,2,16
PAR A
CUP P,8,EMITT106
LOD B,2,32
LOC 60
LOD B,2,24
NOT
AND
FJP L5
MST 2,4,4
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,2,FREER082
LOC 70
MST 2,4,4
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L5 LAB
UJP L6
L4 LAB
LOD A,2,8
LOD A,2,16
IND I,8
LOC 80
CHK I,0,31
STO I
MST 2,16,16
LOD I,2,12
CHK I,0,285
PAR I
LDC I,0
CHK I,0,3
PAR I
LOD A,2,16
LOC 90
PAR A
LOD A,2,20
PAR A
CUP P,8,EMITT106
LOD B,2,28
LOD B,2,24
NOT
AND
FJP L7
MST 2,4,4
LOC 100
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
LOC 110
CUP P,2,ALLOC080
L7 LAB
L6 LAB
UJP L8
L3 LAB
MST 2,4,4
LOD A,2,20
PAR A
CUP B,2,IS$T$059
LOD B,2,24
LOD B,2,32
LEQ B
AND
LOC 120
FJP L9
LOD A,2,8
LOD A,2,20
IND I,8
CHK I,0,31
STO I
MST 2,16,16
LDA 1,22584
LOD I,2,12
CHK J,0,285
LOC 130
IXA 4
IND I,0
CHK I,0,285
PAR I
LDC I,0
CHK I,0,3
PAR I
LOD A,2,20
PAR A
LOD A,2,16
LOC 140
PAR A
CUP P,8,EMITT106
LOD B,2,32
LOD B,2,24
NOT
AND
FJP L10
MST 2,4,4
LOD A,2,8
IND I,0
LOC 150
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L10 LAB
UJP L11
L9 LAB
LOC 160
MST 2,4,4
LOD A,2,16
PAR A
CUP B,2,IS$RT067
FJP L12
LOD B,2,24
FJP L13
MST 2,0,0
CUP P,0,FINDR083
UJP L14
L13 LAB
LOC 170
MST 2,0,0
CUP P,0,FINDR084
L14 LAB
LOD A,2,8
LOD I,1,35476
CHK I,0,31
STO I
MST 2,8,8
LDA 2,40
PAR A
LOD A,2,8
LOC 180
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,16,16
LOD I,2,12
CHK I,0,285
PAR I
LDC I,1
CHK I,0,3
LOC 190
PAR I
LDA 2,40
PAR A
LOD A,2,20
PAR A
CUP P,8,EMITT106
UJP L15
L12 LAB
MST 2,4,4
LOD A,2,20
PAR A
LOC 200
CUP B,2,IS$RT067
FJP L16
LOD B,2,24
FJP L17
MST 2,0,0
CUP P,0,FINDR083
UJP L18
L17 LAB
MST 2,0,0
CUP P,0,FINDR084
L18 LAB
LOD A,2,8
LOC 210
LOD I,1,35476
CHK I,0,31
STO I
MST 2,8,8
LDA 2,40
PAR A
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
LOC 220
CUP P,4,REG$O063
MST 2,16,16
LDA 1,22584
LOD I,2,12
CHK J,0,285
IXA 4
IND I,0
CHK I,0,285
PAR I
LDC I,1
LOC 230
CHK I,0,3
PAR I
LDA 2,40
PAR A
LOD A,2,16
PAR A
CUP P,8,EMITT106
UJP L19
L16 LAB
LDA 1,35308
LDC I,4
LOC 240
CHK J,0,31
IXA 1
IND B,0
MST 2,4,4
LOD A,2,16
PAR A
CUP B,2,USES$069
IOR
MST 2,4,4
LOD A,2,20
LOC 250
PAR A
CUP B,2,USES$069
IOR
FJP L20
LDA 1,35308
LDC I,4
CHK J,0,31
IXA 1
IND B,0
NOT
LOC 260
FJP L21
MST 2,4,4
LDC I,4
CHK I,0,31
PAR I
CUP P,2,FREER082
L21 LAB
LOD B,2,24
FJP L22
MST 2,4,4
LDC I,4
LOC 270
CHK I,0,31
PAR I
CUP P,2,ALLOC081
UJP L23
L22 LAB
MST 2,4,4
LDC I,4
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L23 LAB
LOD A,2,8
LOC 280
LDC I,4
CHK I,0,31
STO I
MST 2,16,16
LOD I,2,12
CHK I,0,285
PAR I
LDC I,2
CHK I,0,3
PAR I
LOC 290
LOD A,2,16
PAR A
LOD A,2,20
PAR A
CUP P,8,EMITT106
UJP L24
L20 LAB
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
LOC 300
IND B,0
MST 2,4,4
LOD A,2,16
PAR A
CUP B,2,USES$070
IOR
MST 2,4,4
LOD A,2,20
PAR A
CUP B,2,USES$070
LOC 310
IOR
FJP L25
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L26
MST 2,4,4
LOC 320
LDC I,6
CHK I,0,31
PAR I
CUP P,2,FREER082
L26 LAB
LOD B,2,24
FJP L27
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
LOC 330
CUP P,2,ALLOC081
UJP L28
L27 LAB
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L28 LAB
LOD I,2,36
CHK I,-1,30
STR I,1,35492
LOC 340
LOD B,2,24
STR B,1,35496
LOD A,2,8
LDC I,6
CHK I,0,31
STO I
MST 2,16,16
LOD I,2,12
CHK I,0,285
PAR I
LOC 350
LDC I,3
CHK I,0,3
PAR I
LOD A,2,16
PAR A
LOD A,2,20
PAR A
CUP P,8,EMITT106
UJP L29
L25 LAB
LOD B,2,28
LOC 360
LOD B,2,24
IOR
FJP L30
MST 2,0,0
CUP P,0,FINDR083
UJP L31
L30 LAB
MST 2,0,0
CUP P,0,FINDR084
L31 LAB
MST 2,8,8
LDA 2,40
LOC 370
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOD B,2,28
FJP L32
LDC I,82
CHK I,0,285
STR I,2,96
LOC 380
UJP L33
L32 LAB
LDC I,75
CHK I,0,285
STR I,2,96
L33 LAB
MST 2,12,12
LOD I,2,96
CHK I,0,285
PAR I
LDA 2,40
PAR A
LOC 390
LOD A,2,16
PAR A
CUP P,6,EMITX077
LOD A,2,8
LOD I,1,35476
CHK I,0,31
STO I
MST 2,16,16
LOD I,2,12
CHK I,0,285
LOC 400
PAR I
LDC I,0
CHK I,0,3
PAR I
LDA 2,40
PAR A
LOD A,2,20
PAR A
CUP P,8,EMITT106
LOD B,2,28
LOC 410
LOD B,2,24
NOT
AND
FJP L34
MST 2,4,4
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,2,FREER082
LOC 420
MST 2,4,4
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L34 LAB
L29 LAB
L24 LAB
L19 LAB
L15 LAB
L11 LAB
L8 LAB
RET P
L1 DEF 100
SST P REG$D113 2 16 0 0 16
LOC 0
REG$D113 ENT P,2,L1 REG_DATUM 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,24
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 10
INC I,1
IXA 116
LDA 1,4576
MOV 116
LOD A,2,24
LOD A,2,12
CHK A,-1,0
STO A
LOD A,2,24
INC A,4
LOC 20
LOD I,2,16
CHK I,0,15
STO I
LOD A,2,24
INC A,72
LDC I,1
CHK I,0,2
STO I
LOD A,2,24
INC A,84
LOC 30
LDC I,0
STO I
LOD A,2,24
INC A,88
LOD I,2,20
CHK I,0,31
STO I
RET P
L1 DEF 28
SST P COERC114 2 8 0 116 8
LOC 0
COERC114 ENT P,2,L1 COERCE_DATUM 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,132
LOD A,2,132
IND I,4
LOD I,2,12
LOC 10
NEQ I
FJP L2
LDA 1,32084
LOD I,2,12
CHK J,0,15
IXA 64
LOD A,2,132
IND I,4
CHK J,0,15
IXA 4
LOC 20
IND I,0
CHK I,0,285
STR I,2,128
LOD I,2,128
LDC I,0
EQU I
FJP L3
MST 2,4,4
LDC I,31
CHK I,0,68
LOC 30
PAR I
CUP P,2,ERROR005
L3 LAB
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L4
LOD A,2,132
IND I,4
LOC 40
LDC I,4
EQU I
LOD I,2,12
LDC I,2
EQU I
AND
FJP L5
UJP L6
L5 LAB
LOD A,2,132
INC A,4
LOC 50
LOD I,2,12
CHK I,0,15
STO I
L6 LAB
UJP L7
L4 LAB
LOD A,2,132
IND I,4
LDC I,3
EQU I
FJP L8
LOD I,2,12
LOC 60
LDC I,2
EQU I
NOT
FJP L9
MST 2,4,4
LCA 'COERCE_DA001'
PAR A
CUP P,2,ASSER003
L9 LAB
L10 LAB
MST 2,4,4
LOD I,2,8
LOC 70
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
LOD A,2,132
IND I,4
LDC I,2
EQU I
FJP L10
UJP L11
L8 LAB
MST 2,8,8
LOC 80
LDA 2,72
PAR A
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
LOC 90
CUP P,2,FREED090
LDA 1,30932
LOD I,2,12
CHK J,0,15
IXA 1
IND B,0
FJP L12
MST 2,0,0
CUP P,0,FINDR083
UJP L13
L12 LAB
LOC 100
MST 2,0,0
CUP P,0,FINDR084
L13 LAB
MST 2,8,8
LDA 2,16
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOC 110
LOD I,2,128
CHK I,0,285
PAR I
LDA 2,16
PAR A
LDA 2,72
PAR A
CUP P,6,EMITX077
MST 2,16,16
LOD I,2,8
LOC 120
CHK I,-1,30
PAR I
LOD A,2,132
IND A,0
CHK A,-1,0
PAR A
LOD I,2,12
CHK I,0,15
PAR I
LOD I,1,35476
LOC 130
CHK I,0,31
PAR I
CUP P,8,REG$D113
L11 LAB
L7 LAB
L2 LAB
RET P
L1 DEF 136
SST P COERC115 2 4 0 12 4
LOC 0
COERC115 ENT P,2,L1 COERCE_TWO_D 1 1 1
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK I,0,15
LOC 10
STR I,2,20
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK I,0,15
STR I,2,16
LOD A,2,8
LOC 20
LOD I,2,20
CHK J,0,15
IXA 1
IND B,0
NOT
LOD A,2,8
LOD I,2,16
CHK J,0,15
IXA 1
IND B,0
LOC 30
NOT
IOR
FJP L2
MST 2,4,4
LDC I,5
CHK I,0,68
PAR I
CUP P,2,ERROR005
L2 LAB
LDA 1,33108
LOD I,2,20
LOC 40
CHK J,0,15
IXA 64
LOD I,2,16
CHK J,0,15
IXA 4
IND I,0
CHK I,0,15
STR I,2,12
LOD I,2,12
LDC I,0
LOC 50
EQU I
FJP L3
MST 2,4,4
LDC I,5
CHK I,0,68
PAR I
CUP P,2,ERROR005
L3 LAB
MST 2,8,8
LOD I,1,39472
LDC I,1
LOC 60
SBI
CHK I,-1,30
PAR I
LOD I,2,12
CHK I,0,15
PAR I
CUP P,4,COERC114
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
LOC 70
PAR I
LOD I,2,12
CHK I,0,15
PAR I
CUP P,4,COERC114
RET P
L1 DEF 24
SST B DATUM116 2 4 0 0 4
LOC 0
DATUM116 ENT B,2,L1 DATUM_IS_REG 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LDA 1,35760
LOC 10
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
EQU M,12
AND
LDA 1,35760
LOD I,2,8
LOC 20
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 30
INC I,1
IXA 116
IND I,4
LDC I,5
NEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 40
IND I,8
LDC I,0
EQU I
IOR
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 50
IND I,72
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,80
LOC 60
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,76
LDC I,0
LOC 70
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,84
LDC I,0
EQU I
LOC 80
AND
STR B,2,0
RET B
L1 DEF 12
SST B DATUM117 2 4 0 0 4
LOC 0
DATUM117 ENT B,2,L1 DATUM_IS_T_R 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LDA 1,35760
LOC 10
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
EQU M,12
AND
LDA 1,35760
LOD I,2,8
LOC 20
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 30
INC I,1
IXA 116
IND I,4
LDC I,5
NEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 40
IND I,8
LDC I,0
EQU I
IOR
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 50
IND I,72
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,80
LOC 60
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,76
LDC I,0
LOC 70
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,84
LDC I,0
EQU I
LOC 80
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LDC I,4
EQU I
LDA 1,35760
LOC 90
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LDC I,6
EQU I
IOR
LOD I,1,35488
LDA 1,35760
LOC 100
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 110
IXA 116
IND I,88
LOD I,1,35484
LEQ I
AND
IOR
AND
STR B,2,0
RET B
L1 DEF 12
SST B DATUM118 2 4 0 0 4
LOC 0
DATUM118 ENT B,2,L1 DATUM_IS_FIL 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,2
EQU I
LDA 1,35760
LOC 10
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
AND
LDA 1,35760
LOD I,2,8
LOC 20
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
EQU M,12
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 30
INC I,1
IXA 116
IND I,72
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 40
IXA 116
IND I,76
LDC I,0
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 50
IND I,80
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,84
LOC 60
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,92
LDC I,1
LOC 70
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,88
LDC I,8
LDC I,172
LOC 80
SBI
EQU I
AND
STR B,2,0
RET B
L1 DEF 12
SST P LOADS119 2 8 0 64 8
LOC 0
LOADS119 ENT P,2,L1 LOADSTACKEXC 1 1 1
LDC I,1
CHK I,-1,30
STR I,2,72
LOD I,1,39472
CHK I,-1,30
STR I,2,80
LOD I,2,72
LOD I,2,80
LEQ I
LOC 10
FJP L3
L2 LAB
LDA 1,35760
LOD I,2,72
CHK J,-1,30
INC I,1
IXA 116
STR A,2,84
LOD I,2,72
LOD I,2,8
LES I
LOC 20
LOD I,2,72
LOD I,2,12
GRT I
IOR
LOD A,2,84
IND I,72
LDC I,0
GRT I
AND
LOD A,2,84
LOC 30
IND I,4
LDC I,5
NEQ I
LOD A,2,84
IND I,8
LDC I,0
EQU I
IOR
AND
MST 2,4,4
LOC 40
LOD I,2,72
CHK I,-1,30
PAR I
CUP B,2,DATUM118
NOT
AND
MST 2,4,4
LOD I,2,72
CHK I,-1,30
PAR I
LOC 50
CUP B,2,DATUM117
NOT
AND
FJP L4
LDA 1,30932
LOD A,2,84
IND I,4
CHK J,0,15
IXA 1
IND B,0
LOC 60
FJP L5
MST 2,0,0
CUP P,0,FINDR083
UJP L6
L5 LAB
MST 2,0,0
CUP P,0,FINDR084
L6 LAB
LOD I,1,35476
CHK I,0,31
STR I,2,76
MST 2,8,8
LOC 70
LDA 2,16
PAR A
LOD I,2,76
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,16
PAR A
LOD I,2,72
LOC 80
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
MST 2,4,4
LOD I,2,72
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,16,16
LOD I,2,72
LOC 90
CHK I,-1,30
PAR I
LOD A,2,84
IND A,0
CHK A,-1,0
PAR A
LOD A,2,84
IND I,4
CHK I,0,15
PAR I
LOC 100
LOD I,2,76
CHK I,0,31
PAR I
CUP P,8,REG$D113
L4 LAB
LOD I,2,72
LOD I,2,80
NEQ I
FJP L3
LOD I,2,72
INC I,1
LOC 110
CHK I,-1,30
STR I,2,72
UJP L2
L3 LAB
RET P
L1 DEF 88
SST P BJUMP120 2 4 0 144 4
LOC 0
BJUMP120 ENT P,2,L1 BJUMP_TO_BIN 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,156
LOD A,2,156
IND I,4
LDC I,5
LOC 10
EQU I
LOD A,2,156
IND I,8
LDC I,1
EQU I
AND
NOT
FJP L2
MST 2,4,4
LCA 'BJUMP_TO_001'
LOC 20
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,4,4
LOD A,2,156
IND A,36
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,16
LOC 30
LOD A,2,156
IND I,12
LOD A,2,156
IND I,24
LES I
FJP L3
LDC B,1
STR B,2,12
UJP L4
L3 LAB
LDC B,0
LOC 40
STR B,2,12
L4 LAB
MST 2,4,4
LOD A,2,156
IND A,36
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,152
LOD A,2,152
LOC 50
CHK A,0,0
MST 2,4,4
LOD A,2,152
CHK A,0,0
IND A,0
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STO A
LOC 60
LOD B,2,12
LOD A,2,156
IND B,40
NEQ B
FJP L5
MST 2,4,4
LOD A,2,156
IND A,36
CHK A,-1,0
PAR A
LOC 70
CUP P,2,INVER045
LOD A,2,156
INC A,40
LOD A,2,156
IND B,40
NOT
STO B
L5 LAB
MST 2,8,8
LDA 2,76
PAR A
LOC 80
LOD A,2,156
IND I,88
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOD B,2,12
LDC B,1
EQU B
FJP L6
MST 2,8,8
LOC 90
LDA 2,20
PAR A
LDC I,1
PAR I
CUP P,4,IMM$O064
MST 2,16,16
LOD A,2,152
CHK A,-1,0
PAR A
LDC I,67
LOC 100
CHK I,0,285
PAR I
LDA 2,76
PAR A
LDA 2,20
PAR A
CUP P,8,INSER101
LOD A,2,152
CHK A,0,0
IND A,0
LOC 110
CHK A,-1,0
STR A,2,144
LOD A,2,144
CHK A,-1,0
STR A,2,152
MST 2,24,24
LOD A,2,152
CHK A,-1,0
PAR A
LDC I,169
LOC 120
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 1,4400
PAR A
LDA 1,4400
PAR A
LDC N
LOC 130
CHK A,-1,0
PAR A
CUP P,12,INSER099
LOD A,2,152
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,136
MST 2,4,4
LOD A,2,136
LOC 140
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,152
MST 2,16,16
LOD A,2,152
CHK A,-1,0
PAR A
LDC I,67
LOC 150
CHK I,0,285
PAR I
LDA 2,76
PAR A
LDA 1,4400
PAR A
CUP P,8,INSER101
LOD A,2,152
CHK A,0,0
IND A,0
LOC 160
CHK A,-1,0
STR A,2,140
MST 2,8,8
LOD A,2,156
IND A,36
CHK A,-1,0
PAR A
LOD A,2,140
CHK A,-1,0
PAR A
LOC 170
CUP P,4,FIXSO046
MST 2,4,4
LOD A,2,140
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,132
LOD A,2,132
LDC N
LOC 180
NEQ A
FJP L7
MST 2,8,8
LOD A,2,136
CHK A,-1,0
PAR A
LOD A,2,132
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
LOC 190
UJP L8
L7 LAB
MST 2,8,8
LOD A,2,136
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
L8 LAB
UJP L9
L6 LAB
LOC 200
MST 2,16,16
LOD A,2,152
CHK A,-1,0
PAR A
LDC I,67
CHK I,0,285
PAR I
LDA 2,76
PAR A
LDA 1,4400
LOC 210
PAR A
CUP P,8,INSER101
LOD A,2,152
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,140
LOD A,2,140
CHK A,-1,0
STR A,2,152
LOC 220
MST 2,24,24
LOD A,2,152
CHK A,-1,0
PAR A
LDC I,169
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LOC 230
LDA 1,4400
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,12,INSER099
LOD A,2,152
CHK A,0,0
LOC 240
IND A,0
CHK A,-1,0
STR A,2,136
MST 2,4,4
LOD A,2,136
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
STR A,2,152
LOC 250
MST 2,8,8
LDA 2,20
PAR A
LDC I,1
PAR I
CUP P,4,IMM$O064
MST 2,16,16
LOD A,2,152
CHK A,-1,0
PAR A
LOC 260
LDC I,67
CHK I,0,285
PAR I
LDA 2,76
PAR A
LDA 2,20
PAR A
CUP P,8,INSER101
LOD A,2,152
CHK A,0,0
LOC 270
IND A,0
CHK A,-1,0
STR A,2,144
MST 2,8,8
LOD A,2,156
IND A,36
CHK A,-1,0
PAR A
LOD A,2,144
CHK A,-1,0
LOC 280
PAR A
CUP P,4,FIXSO046
MST 2,4,4
LOD A,2,144
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,132
LOD A,2,132
LOC 290
LDC N
NEQ A
FJP L10
MST 2,8,8
LOD A,2,136
CHK A,-1,0
PAR A
LOD A,2,132
CHK A,-1,0
PAR A
LOC 300
CUP P,4,FIXSO046
UJP L11
L10 LAB
MST 2,8,8
LOD A,2,136
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
L11 LAB
L9 LAB
LOC 310
LOD A,2,156
IND A,20
CHK A,-1,0
STR A,2,152
L12 LAB
LOD A,2,152
LDC N
NEQ A
FJP L13
MST 2,4,4
LOD A,2,152
LOC 320
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,148
MST 2,8,8
LOD A,2,152
CHK A,-1,0
PAR A
LOD A,2,144
LOC 330
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,148
CHK A,-1,0
STR A,2,152
UJP L12
L13 LAB
LOD A,2,156
IND A,32
CHK A,-1,0
LOC 340
STR A,2,152
L14 LAB
LOD A,2,152
LDC N
NEQ A
FJP L15
MST 2,4,4
LOD A,2,152
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
LOC 350
CHK A,-1,0
STR A,2,148
MST 2,8,8
LOD A,2,152
CHK A,-1,0
PAR A
LOD A,2,140
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOC 360
LOD A,2,148
CHK A,-1,0
STR A,2,152
UJP L14
L15 LAB
MST 2,16,16
LOD I,2,8
CHK I,-1,30
PAR I
LOD A,2,156
IND A,0
LOC 370
CHK A,-1,0
PAR A
LDC I,5
CHK I,0,15
PAR I
LOD A,2,156
IND I,88
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOC 380
LOD A,2,156
INC A,8
LDC I,0
CHK I,0,1
STO I
RET P
L1 DEF 160
SST P INCRE121 2 8 0 124 8
LOC 0
INCRE121 ENT P,2,L1 INCREMENT_DA 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,140
LOD A,2,140
IND I,4
ORD
LOC 10
CHK S,0,63
LDC S,(0,0,0,3948)
INN
NOT
FJP L2
MST 2,4,4
LDC I,45
CHK I,0,68
PAR I
CUP P,2,ERROR005
L2 LAB
LOC 20
LOD I,2,12
LDC I,0
NEQ I
FJP L3
LOD A,2,140
IND I,4
CHK I,0,15
STR I,2,16
LOD A,2,140
IND I,4
LOC 30
ORD
CHK S,0,63
LDC S,(0,0,0,96)
INN
FJP L4
LOD A,2,140
IND I,4
LDC I,5
EQU I
LOD A,2,140
LOC 40
IND I,8
LDC I,1
EQU I
AND
FJP L5
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,2,BJUMP120
L5 LAB
LOC 50
LOD A,2,140
INC A,4
LDC I,8
CHK I,0,15
STO I
L4 LAB
LOD A,2,140
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,2060)
LOC 60
INN
NOT
FJP L6
MST 2,8,8
LOD I,2,8
CHK I,-1,30
PAR I
LDC I,10
CHK I,0,15
PAR I
LOC 70
CUP P,4,COERC114
L6 LAB
LOD A,2,140
IND I,4
LDC I,11
EQU I
FJP L7
MST 2,8,8
LDA 2,76
PAR A
LOD I,2,8
LOC 80
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,20
PAR A
LOD I,2,12
PAR I
CUP P,4,IMM$O064
MST 2,32,32
LOC 90
LDA 2,136
PAR A
LDC I,9
CHK I,0,285
PAR I
LDA 2,76
PAR A
LDA 2,20
PAR A
LDC B,1
LOC 100
PAR B
LDC B,1
PAR B
LDC B,1
PAR B
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOC 110
LOD I,2,8
CHK I,-1,30
PAR I
LOD I,2,136
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,2,8
CHK I,-1,30
LOC 120
PAR I
LOD A,2,140
IND A,0
CHK A,-1,0
PAR A
LDC I,11
CHK I,0,15
PAR I
LOD I,2,136
CHK I,0,31
LOC 130
PAR I
CUP P,8,REG$D113
UJP L8
L7 LAB
LDC B,0
STR B,2,133
LDC B,0
STR B,2,132
L9 LAB
LOD A,2,140
IND I,56
LDC I,0
LOC 140
EQU I
FJP L10
LDC B,1
STR B,2,133
UJP L11
L10 LAB
MST 2,12,12
LDA 2,134
PAR A
LDA 2,76
PAR A
LOC 150
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,134
FJP L12
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
LOC 160
CUP P,2,SIMPL111
UJP L13
L12 LAB
LDC B,1
STR B,2,132
L13 LAB
L11 LAB
LOD B,2,133
LOD B,2,132
IOR
FJP L9
LOD B,2,133
FJP L14
LOC 170
LOD A,2,140
INC A,64
LOD A,2,140
IND I,64
LOD I,2,12
ADI
STO I
UJP L15
L14 LAB
MST 2,8,8
LDA 2,20
LOC 180
PAR A
LOD I,2,12
PAR I
CUP P,4,IMM$O064
MST 2,20,20
LDA 2,136
PAR A
LDC I,8
CHK I,0,285
PAR I
LOC 190
LDA 2,76
PAR A
LDA 2,20
PAR A
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,10,ADD$S112
MST 2,8,8
LOD I,2,8
LOC 200
CHK I,-1,30
PAR I
LOD I,2,136
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,2,8
CHK I,-1,30
PAR I
LOC 210
LOD A,2,140
IND A,0
CHK A,-1,0
PAR A
LOD A,2,140
IND I,4
CHK I,0,15
PAR I
LOD I,2,136
CHK I,0,31
LOC 220
PAR I
CUP P,8,REG$D113
L15 LAB
L8 LAB
LOD I,2,16
ORD
CHK S,0,63
LDC S,(0,0,0,96)
INN
FJP L16
MST 2,8,8
LOD I,2,8
LOC 230
CHK I,-1,30
PAR I
LDC I,8
CHK I,0,15
PAR I
CUP P,4,COERC114
LOD A,2,140
INC A,4
LOD I,2,16
CHK I,0,15
LOC 240
STO I
LOD A,2,140
IND I,4
LDC I,5
EQU I
FJP L17
LOD A,2,140
INC A,8
LDC I,0
CHK I,0,1
LOC 250
STO I
L17 LAB
L16 LAB
L3 LAB
RET P
L1 DEF 144
SST P BINTV122 2 4 0 64 4
LOC 0
BINTV122 ENT P,2,L1 BINTVAL_TO_B 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,76
LOD A,2,76
IND I,4
LDC I,5
LOC 10
EQU I
LOD A,2,76
IND I,8
LDC I,0
EQU I
AND
NOT
FJP L2
MST 2,4,4
LCA 'BINTVAL_T001'
LOC 20
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,8,8
LDA 2,12
PAR A
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LOC 30
LOD I,2,8
CHK I,-1,30
PAR I
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,4,LOADS119
LDA 1,35308
LDC I,6
CHK J,0,31
LOC 40
IXA 1
IND B,0
NOT
LOD I,1,35492
LOD I,2,8
NEQ I
AND
FJP L3
MST 2,0,0
CUP P,0,MOVE$085
L3 LAB
LOC 50
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,2,FREED090
LOD A,1,328
CHK A,-1,0
STR A,2,68
MST 2,20,20
LDC I,169
LOC 60
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,12
PAR A
LDA 1,4400
PAR A
LDC N
LOC 70
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LOC 80
LDA 1,4512
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,68
LOC 90
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
LOD A,2,76
IND A,0
CHK A,-1,0
STR A,2,72
LOC 100
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LDA 1,4576
MOV 116
LOD A,2,76
LOD A,2,72
CHK A,-1,0
LOC 110
STO A
LOD A,2,76
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,2,76
INC A,72
LDC I,1
CHK I,0,2
LOC 120
STO I
MST 2,0,0
CUP P,0,FINDR084
LOD A,2,76
INC A,84
LDC I,0
STO I
LOD A,2,76
INC A,88
LOD I,1,35476
LOC 130
CHK I,0,31
STO I
LOD A,2,76
INC A,8
LDC I,1
CHK I,0,1
STO I
LOD A,2,76
INC A,12
LDA 1,4736
LOC 140
MOV 12
LOD A,2,76
INC A,24
LDA 1,4736
MOV 12
LOD A,2,76
INC A,40
LDC B,1
STO B
LOD A,2,76
LOC 150
INC A,36
LOD A,2,68
CHK A,-1,0
STO A
RET P
L1 DEF 80
SST P PARMR123 2 8 0 4 8
LOC 0
PARMR123 ENT P,2,L1 PARMREG_TO_P 1 1 1
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
STR A,2,20
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 10
IXA 116
STR A,2,24
LOD A,2,24
IND I,72
LDC I,1
GEQ I
FJP L2
LOD A,2,24
IND I,84
LDC I,0
LOC 20
EQU I
FJP L3
MST 2,4,4
LOD A,2,24
IND I,88
CHK I,0,31
PAR I
CUP B,2,IS$PA087
FJP L4
LDA 1,35572
LOC 30
LOD A,2,24
IND I,88
CHK J,0,31
IXA 4
IND I,0
LOD I,2,12
LES I
FJP L5
LDA 1,35572
LOD A,2,24
LOC 40
IND I,88
CHK J,0,31
IXA 4
IND I,0
STR I,2,16
LOD A,2,24
INC A,84
LDC I,1
STO I
LOD A,2,24
LOC 50
INC A,92
LOD I,1,5032
CHK I,0,8
STO I
LOD A,2,24
INC A,88
LOD A,2,20
IND I,24
NGI
LOD A,2,20
LOC 60
IND I,40
SBI
LOD A,2,20
IND I,44
SBI
LOD I,2,16
LDC I,4
MPI
ADI
STO I
LOC 70
LOD A,2,24
IND I,72
LDC I,2
GEQ I
FJP L6
LOD A,2,24
IND I,104
LDC I,0
EQU I
FJP L7
LOC 80
MST 2,4,4
LOD A,2,24
IND I,108
CHK I,0,31
PAR I
CUP B,2,IS$PA087
FJP L8
LDA 1,35572
LOD A,2,24
IND I,108
LOC 90
CHK J,0,31
IXA 4
IND I,0
LOD I,2,12
LES I
FJP L9
LDA 1,35572
LOD A,2,24
IND I,108
CHK J,0,31
LOC 100
IXA 4
IND I,0
STR I,2,16
LOD A,2,24
INC A,104
LDC I,1
STO I
LOD A,2,24
INC A,112
LOD I,1,5032
LOC 110
CHK I,0,8
STO I
LOD A,2,24
INC A,108
LOD A,2,20
IND I,24
NGI
LOD A,2,20
IND I,40
SBI
LOC 120
LOD A,2,20
IND I,44
SBI
LOD I,2,16
LDC I,4
MPI
ADI
STO I
L9 LAB
L8 LAB
L7 LAB
L6 LAB
L5 LAB
L4 LAB
L3 LAB
L2 LAB
RET P
L1 DEF 28
SST P TRANS124 2 4 0 4 4
LOC 0
TRANS124 ENT P,2,L1 TRANSLATE_LV 1 1 1
LOD A,2,8
IND I,0
LDC I,1
EQU I
NOT
FJP L2
MST 2,4,4
LCA 'TRANSL_LV001'
PAR A
LOC 10
CUP P,2,ASSER003
L2 LAB
LOD A,2,8
IND I,8
LOD I,1,5032
LEQ I
NOT
FJP L3
MST 2,4,4
LCA 'TRANSL_LV002'
PAR A
LOC 20
CUP P,2,ASSER003
L3 LAB
LOD A,2,8
IND I,8
CHK I,0,8
STR I,2,12
LDA 1,39928
LOD I,2,12
CHK J,0,8
IXA 48
STR A,2,16
LOC 30
LOD A,2,8
IND I,4
LDC I,0
LEQ I
FJP L4
LOD A,2,8
INC A,4
LOD A,2,8
IND I,4
LOD A,2,16
LOC 40
IND I,20
SBI
STO I
UJP L5
L4 LAB
LOD A,2,8
IND I,4
LOD A,2,16
IND I,32
GEQ I
LOD A,2,8
LOC 50
IND I,4
LOD A,2,16
IND I,32
LOD A,2,16
IND I,28
ADI
LES I
AND
LOD A,2,8
IND I,8
LOC 60
LOD I,1,5032
EQU I
AND
LOD I,1,44
LDC I,27
NEQ I
AND
FJP L6
LOD A,2,8
INC A,4
LOC 70
LDA 1,35532
LOD A,2,8
IND I,4
LOD A,2,16
IND I,32
SBI
LDC I,4
DVI
CHK J,0,9
IXA 4
LOC 80
IND I,0
CHK I,0,31
STO I
LOD A,2,8
LDC I,0
STO I
UJP L7
L6 LAB
LOD A,2,8
INC A,4
LOD A,2,8
LOC 90
IND I,4
LOD A,2,16
IND I,16
SBI
STO I
L7 LAB
L5 LAB
RET P
L1 DEF 20
SST B IS$SI125 2 4 0 0 4
LOC 0
IS$SI125 ENT B,2,L1 IS_SIMPLE 1 1 1
LOD A,2,8
IND I,4
LDC I,1
EQU I
LOD A,2,8
IND I,0
LDC I,0
EQU I
AND
LOC 10
LOD A,2,8
IND I,8
LDC I,0
EQU I
AND
STR B,2,0
RET B
L1 DEF 12
SST B FITS$056 2 4 0 0 4
LOC 0
FITS$056 ENT B,2,L1 FITS_SHRT_OF 1 1 1
LOD I,2,8
LDC I,4
MOD
LDC I,0
EQU I
LDC I,-32
LOD I,2,8
LDC I,4
DVI
LOC 10
LEQ I
AND
LOD I,2,8
LDC I,4
DVI
LDC I,31
LEQ I
AND
STR B,2,0
RET B
L1 DEF 12
SST B FITS$126 2 4 0 4 4
LOC 0
FITS$126 ENT B,2,L1 FITS_SHORT_I 1 1 1
LOD A,2,8
IND I,8
LDC I,0
EQU I
FJP L2
LDC B,1
STR B,2,0
UJP L3
L2 LAB
LOD A,2,8
LOC 10
IND I,12
LDC I,4
DVI
STR I,2,12
LOD A,2,8
IND I,4
LDC I,1
EQU I
LOD A,2,8
IND I,16
LOC 20
LDC I,0
GRT I
AND
LOD A,2,8
IND I,12
LDC I,4
MOD
LDC I,0
EQU I
AND
LOC 30
LDC I,-32
LOD I,2,12
LEQ I
AND
LOD I,2,12
LDC I,31
LEQ I
AND
STR B,2,0
L3 LAB
RET B
L1 DEF 16
SST B IS$CO006 2 4 0 0 4
LOC 0
IS$CO006 ENT B,2,L1 IS_CONSTANT 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LDA 1,35760
LOC 10
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
AND
LDA 1,35760
LOD I,2,8
LOC 20
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 40
IXA 116
IND I,4
LDC I,5
NEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,8
LOC 50
LDC I,0
EQU I
IOR
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,68
LOC 60
LDC I,0
EQU I
AND
STR B,2,0
RET B
L1 DEF 12
SST B IS$CO127 2 4 0 0 4
LOC 0
IS$CO127 ENT B,2,L1 IS_CONST_PLU 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LDA 1,35760
LOC 10
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,40)
INN
NOT
LOC 20
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,1
EQU I
AND
LOC 30
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,0
NEQ I
AND
LDA 1,35760
LOC 40
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,68
LDC I,0
EQU I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
LOC 50
INC I,1
IXA 116
IND I,72
LDC I,1
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
LOC 60
IXA 116
IND I,76
LDC I,0
EQU I
AND
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
LOC 70
IND I,68
LDC I,0
NEQ I
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
LOC 80
EQU I
AND
IOR
AND
STR B,2,0
RET B
L1 DEF 12
SST P PUSHT128 2 0 0 0 0
LOC 0
PUSHT128 ENT P,2,L1 PUSHTOP 1 1 1
LOD I,1,39472
LDC I,30
LES I
FJP L2
LOD I,1,39472
LDC I,1
ADI
CHK I,-1,30
STR I,1,39472
LOC 10
UJP L3
L2 LAB
MST 2,4,4
LDC I,13
CHK I,0,68
PAR I
CUP P,2,ERROR005
L3 LAB
RET P
L1 DEF 8
SST P POPTO129 2 0 0 0 0
LOC 0
POPTO129 ENT P,2,L1 POPTOP 1 1 1
LOD I,1,39472
LDC I,1
GEQ I
FJP L2
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,1,39472
LOC 10
UJP L3
L2 LAB
MST 2,4,4
LDC I,50
CHK I,0,68
PAR I
CUP P,2,ERROR005
L3 LAB
RET P
L1 DEF 8
SST P UPD$R130 2 8 0 16 8
LOC 0
UPD$R130 ENT P,2,L1 UPD_REALTBL 1 1 1
LDC B,0
STR B,2,16
LOD A,2,8
LDC I,0
CHK I,-16777216,16777215
STO I
LOD A,1,400
CHK A,-1,0
STR A,2,20
LOC 10
MST 2,8,8
LDA 2,24
PAR A
LOD R,2,12
PAR R
CUP P,4,REAL$023
L2 LAB
LOD B,2,16
NOT
LOD A,2,20
LDC N
LOC 20
NEQ A
AND
FJP L3
LOD A,2,20
CHK A,0,0
INC A,4
LDA 2,24
EQU M,8
FJP L4
LDC B,1
LOC 30
STR B,2,16
UJP L5
L4 LAB
LOD A,2,20
CHK A,0,0
IND A,0
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,20
LOD A,2,8
LOC 40
LOD A,2,8
IND I,0
LDC I,4
ADI
CHK I,-16777216,16777215
STO I
L5 LAB
UJP L2
L3 LAB
LOD B,2,16
NOT
FJP L6
LOC 50
MST 2,8,8
LDA 1,392
PAR A
LDA 2,24
PAR A
CUP P,4,EMIT$102
L6 LAB
RET P
L1 DEF 32
SST P UPD$S131 2 12 0 24 12
LOC 0
UPD$S131 ENT P,2,L1 UPD_SETTBL 1 1 1
LDC B,0
STR B,2,20
LOD A,2,8
LDC I,0
CHK I,-16777216,16777215
STO I
LOD A,1,388
CHK A,-1,0
STR A,2,24
LOC 10
MST 2,16,16
LDA 2,36
PAR A
LDA 2,28
PAR A
LOD S,2,12
PAR S
CUP P,6,SETRE026
L2 LAB
LOD B,2,20
NOT
LOC 20
LOD A,2,24
LDC N
NEQ A
AND
FJP L3
LOD A,2,24
CHK A,0,0
INC A,4
LDA 2,36
EQU M,8
LOC 30
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,0,0
INC A,4
LDA 2,28
EQU M,8
AND
FJP L4
LDC B,1
LOC 40
STR B,2,20
UJP L5
L4 LAB
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
LOD A,2,8
LOC 50
LOD A,2,8
IND I,0
LDC I,2
LDC I,4
MPI
ADI
CHK I,-16777216,16777215
STO I
L5 LAB
UJP L2
L3 LAB
LOD B,2,20
LOC 60
NOT
FJP L6
MST 2,8,8
LDA 1,380
PAR A
LDA 2,36
PAR A
CUP P,4,EMIT$102
MST 2,8,8
LDA 1,380
LOC 70
PAR A
LDA 2,28
PAR A
CUP P,4,EMIT$102
L6 LAB
RET P
L1 DEF 44
SST P UPD$P132 2 8 0 4 8
LOC 0
UPD$P132 ENT P,2,L1 UPD_PROCTBL 1 1 1
LOD A,1,496
LDC N
EQU A
FJP L2
LDA 1,496
NEW 24
LOD A,1,496
CHK A,0,0
STR A,2,20
LOC 10
LOD A,2,20
LOD A,2,12
MOV 8
LOD A,2,20
INC A,8
LDA 1,4724
MOV 12
LOD A,2,20
INC A,20
LDC N
LOC 20
CHK A,-1,0
STO A
LDC I,1
STR I,1,492
LOD A,2,8
LOD A,1,496
CHK A,-1,0
STO A
UJP L3
L2 LAB
LOD A,1,496
LOC 30
CHK A,-1,0
STR A,2,16
L4 LAB
LOD A,2,16
CHK A,0,0
IND A,20
LDC N
NEQ A
LOD A,2,16
CHK A,0,0
LOD A,2,12
LOC 40
NEQ M,8
AND
FJP L5
LOD A,2,16
CHK A,0,0
IND A,20
CHK A,-1,0
STR A,2,16
UJP L4
L5 LAB
LOD A,2,16
LOC 50
CHK A,0,0
LOD A,2,12
EQU M,8
FJP L6
LOD A,2,8
LOD A,2,16
CHK A,-1,0
STO A
UJP L7
L6 LAB
LOD A,2,16
LOC 60
CHK A,0,0
INC A,20
NEW 24
LOD A,2,16
CHK A,0,0
IND A,20
CHK A,0,0
STR A,2,20
LOD A,2,20
LOD A,2,12
LOC 70
MOV 8
LOD A,2,20
INC A,8
LDA 1,4724
MOV 12
LOD A,2,20
INC A,20
LDC N
CHK A,-1,0
STO A
LOC 80
LOD I,1,492
LDC I,1
ADI
STR I,1,492
LOD A,2,8
LOD A,2,16
CHK A,0,0
IND A,20
CHK A,-1,0
STO A
L7 LAB
L3 LAB
LOC 90
RET P
L1 DEF 24
SST P UPD$L049 2 12 0 12 12
LOC 0
UPD$L049 ENT P,2,L1 UPD_LBLTBL 1 1 1
MST 2,4,4
LOD I,2,12
CHK I,1,99999
PAR I
CUP I,2,LABEL027
CHK I,0,196
STR I,2,20
LDA 1,500
LOD I,2,20
LOC 10
CHK J,0,196
IXA 4
IND A,0
CHK A,-1,0
STR A,2,24
LDC B,0
STR B,2,28
L2 LAB
LOD B,2,28
NOT
LOD A,2,24
LOC 20
LDC N
NEQ A
AND
FJP L3
LOD A,2,24
CHK A,0,0
IND I,0
LOD I,2,12
EQU I
FJP L4
LOC 30
LDC B,1
STR B,2,28
UJP L5
L4 LAB
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,-1,0
STR A,2,24
L5 LAB
UJP L2
L3 LAB
LOD B,2,28
LOC 40
FJP L6
LOD A,2,8
LOD A,2,24
CHK A,-1,0
STO A
UJP L7
L6 LAB
LDA 2,24
NEW 32
LOD A,2,24
CHK A,0,0
LOC 50
INC A,4
LDA 1,500
LOD I,2,20
CHK J,0,196
IXA 4
IND A,0
CHK A,-1,0
STO A
LDA 1,500
LOD I,2,20
LOC 60
CHK J,0,196
IXA 4
LOD A,2,24
CHK A,-1,0
STO A
LOD A,2,24
CHK A,0,0
LOD I,2,12
CHK I,1,99999
STO I
LOC 70
LOD A,2,24
CHK A,0,0
INC A,8
LDC B,0
STO B
LOD I,2,16
ORD
CHK I,0,1
XJP L8
L12 LAB
LOD A,2,24
LOC 80
CHK A,0,0
INC A,16
LDA 1,4724
MOV 12
UJP L11
L13 LAB
LOD A,2,24
CHK A,0,0
INC A,16
LDA 1,4736
MOV 12
LOC 90
LOD A,2,24
CHK A,0,0
INC A,28
LDC B,0
STO B
UJP L11
L8 DEF 0
L9 DEF 1
L10 LAB
UJP L12
UJP L13
L11 LAB
LOD A,2,8
LOD A,2,24
LOC 100
CHK A,-1,0
STO A
L7 LAB
RET P
L1 DEF 32
SST P UPD$B133 2 16 0 32 16
LOC 0
UPD$B133 ENT P,2,L1 UPD_BOUNDTBL 1 1 1
MST 2,8,8
LDA 2,48
PAR A
LOD I,2,12
PAR I
CUP P,4,INTEG025
MST 2,8,8
LDA 2,40
PAR A
LOC 10
LOD I,2,16
PAR I
CUP P,4,INTEG025
LDA 2,32
LDA 1,4568
MOV 8
MST 2,16,16
LDA 2,32
PAR A
LDC I,0
LOC 20
CHK I,0,35
PAR I
LDC I,9
CHK I,1,36
PAR I
LDA 1,30724
LOD I,2,20
CHK J,0,15
IXA 1
IND C,0
LOC 30
ORD
PAR I
CUP P,8,PUTFI022
LOD A,1,364
CHK A,-1,0
STR A,2,28
LOD A,2,8
LDC I,0
CHK I,-16777216,16777215
STO I
LOC 40
LDC B,0
STR B,2,24
L2 LAB
LOD B,2,24
NOT
LOD A,2,28
LDC N
NEQ A
AND
FJP L3
LOD A,2,28
LOC 50
CHK A,0,0
INC A,4
LDA 2,48
EQU M,8
LOD A,2,28
CHK A,0,0
IND A,0
CHK A,0,0
INC A,4
LDA 2,40
LOC 60
EQU M,8
AND
LOD A,2,28
CHK A,0,0
IND A,0
CHK A,0,0
IND A,0
CHK A,0,0
INC A,4
LDA 2,32
LOC 70
EQU M,8
AND
FJP L4
LDC B,1
STR B,2,24
UJP L5
L4 LAB
LOD A,2,28
CHK A,0,0
IND A,0
CHK A,0,0
LOC 80
IND A,0
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,28
LOD A,2,8
LOD A,2,8
IND I,0
LDC I,3
LDC I,4
LOC 90
MPI
ADI
CHK I,-16777216,16777215
STO I
L5 LAB
UJP L2
L3 LAB
LOD B,2,24
NOT
FJP L6
MST 2,8,8
LDA 1,356
LOC 100
PAR A
LDA 2,48
PAR A
CUP P,4,EMIT$102
MST 2,8,8
LDA 1,356
PAR A
LDA 2,40
PAR A
CUP P,4,EMIT$102
LOC 110
MST 2,8,8
LDA 1,356
PAR A
LDA 2,32
PAR A
CUP P,4,EMIT$102
L6 LAB
RET P
L1 DEF 56
SST P INSER134 2 8 0 0 8
LOC 0
INSER134 ENT P,2,L1 INSERT_SHORT 1 1 1
MST 2,4,4
LOD A,2,12
PAR A
CUP B,2,FITS$126
LOD A,2,8
IND I,0
LDC I,1
EQU I
AND
LOC 10
NOT
FJP L2
MST 2,4,4
LCA 'INS_SH_VP001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOD A,2,12
IND I,8
LDC I,0
EQU I
LOC 20
FJP L3
LOD A,2,12
IND I,4
LDC I,1
EQU I
FJP L4
LOD A,2,8
INC A,4
LDC I,0
CHK I,0,31
LOC 30
STO I
LOD A,2,8
INC A,8
LOD A,2,12
IND I,12
CHK I,-32,31
STO I
UJP L5
L4 LAB
LOD A,2,8
INC A,4
LOC 40
LOD A,2,12
IND I,12
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LDC I,0
CHK I,-32,31
STO I
L5 LAB
UJP L6
L3 LAB
LOC 50
LOD A,2,8
INC A,4
LDA 1,35500
LOD A,2,12
IND I,16
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
LOC 60
STO I
LOD A,2,8
INC A,8
LOD A,2,12
IND I,12
LDC I,4
DVI
CHK I,-32,31
STO I
L6 LAB
LOD A,2,8
LOC 70
INC A,32
LOD A,2,12
IND I,0
CHK I,0,3
STO I
RET P
L1 DEF 16
SST P VPA$O135 2 8 0 0 8
LOC 0
VPA$O135 ENT P,2,L1 VPA_OPERAND_ 1 1 1
LOD A,2,12
IND I,8
LDC I,0
EQU I
FJP L2
LOD A,2,8
LDA 1,4456
MOV 56
LOD A,2,8
LOC 10
LDC I,0
CHK I,0,1
STO I
LOD A,2,12
IND I,4
LDC I,1
EQU I
FJP L3
LOD A,2,8
INC A,4
LOC 20
LDC I,0
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LOD A,2,12
IND I,12
CHK I,-32,31
STO I
UJP L4
L3 LAB
LOC 30
LOD A,2,8
INC A,4
LOD A,2,12
IND I,12
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LDC I,0
CHK I,-32,31
LOC 40
STO I
L4 LAB
UJP L5
L2 LAB
MST 2,4,4
LOD A,2,12
IND I,12
CHK I,-16777216,16777215
PAR I
CUP B,2,FITS$056
LOD A,2,12
IND I,16
LOC 50
LDC I,0
GRT I
AND
FJP L6
LOD A,2,12
IND I,4
LDC I,2
EQU I
FJP L7
MST 2,8,8
LOC 60
LOD A,2,8
PAR A
LDC I,0
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
UJP L8
L7 LAB
LOD A,2,8
LDA 1,4456
MOV 56
LOC 70
LOD A,2,8
LDC I,0
CHK I,0,1
STO I
L8 LAB
LOD A,2,8
INC A,4
LDA 1,35500
LOD A,2,12
IND I,16
CHK J,1,8
LOC 80
DEC I,1
IXA 4
IND I,0
CHK I,0,31
STO I
LOD A,2,8
INC A,8
LOD A,2,12
IND I,12
LDC I,4
LOC 90
DVI
CHK I,-32,31
STO I
UJP L9
L6 LAB
LOD A,2,12
IND I,16
LDC I,0
EQU I
FJP L10
MST 2,8,8
LOC 100
LOD A,2,8
PAR A
LOD A,2,12
IND I,12
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
UJP L11
L10 LAB
MST 2,12,12
LOD A,2,8
LOC 110
PAR A
LDA 1,35500
LOD A,2,12
IND I,16
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
PAR I
LOC 120
LOD A,2,12
IND I,12
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
L11 LAB
LOD A,2,12
IND I,4
LDC I,2
EQU I
FJP L12
LOC 130
LOD A,2,8
INC A,16
LDC I,1
CHK I,0,1
STO I
L12 LAB
L9 LAB
L5 LAB
RET P
L1 DEF 16
SST P FIT$I109 2 12 0 48 12
LOC 0
FIT$I109 ENT P,2,L1 FIT_IN_OPERA 1 1 1
LOD A,2,8
LDC B,0
STO B
LDA 1,35760
LOD I,2,16
CHK J,-1,30
INC I,1
IXA 116
STR A,2,68
LOC 10
LOD A,2,68
IND I,60
LDC I,1
EQU I
NOT
FJP L2
MST 2,4,4
LCA 'FIT_IN_OP001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOC 20
LOD A,2,68
IND I,4
LDC I,3
EQU I
FJP L3
LOD A,2,8
LDC B,1
STO B
UJP L4
L3 LAB
MST 2,4,4
LOC 30
LOD I,2,16
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L5
LOD A,2,68
IND I,56
LDC I,0
EQU I
NOT
LOC 40
FJP L6
MST 2,4,4
LCA 'FIT_IN_OP002'
PAR A
CUP P,2,ASSER003
L6 LAB
LOD A,2,68
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,1888)
LOC 50
INN
FJP L7
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,68
IND I,64
PAR I
CUP P,4,IMM$O064
UJP L8
L7 LAB
LOC 60
LOD A,2,68
IND I,4
LDC I,11
EQU I
FJP L9
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,68
IND I,64
LOC 70
PAR I
CUP P,4,EXTEN071
LOD A,2,12
INC A,8
LDC I,1
CHK I,-32,31
STO I
UJP L10
L9 LAB
LOD A,2,68
IND I,4
LOC 80
LDC I,2
EQU I
FJP L11
LOD A,2,68
IND I,64
LDC I,0
LES I
LOD A,2,68
IND I,64
LDC I,1073741823
LOC 90
GRT I
IOR
FJP L12
MST 2,4,4
LDC I,1
CHK I,0,68
PAR I
CUP P,2,ERROR005
L12 LAB
MST 2,8,8
LOD A,2,12
LOC 100
PAR A
LOD A,2,68
IND I,64
PAR I
CUP P,4,IMM$O064
UJP L13
L11 LAB
LOD A,2,68
IND I,4
LDC I,13
EQU I
LOC 110
FJP L14
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,68
IND R,52
PAR R
CUP P,4,REAL$065
UJP L15
L14 LAB
LOD A,2,68
LOC 120
IND I,4
LDC I,7
EQU I
FJP L16
MST 2,12,12
LOD A,2,12
PAR A
LDC I,3
CHK I,0,31
PAR I
LOC 130
LDC I,0
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOD A,2,12
INC A,48
LDC I,2
CHK I,0,5
STO I
MST 2,12,12
LOC 140
LOD A,2,12
INC A,44
PAR A
LOD A,2,68
IND S,44
PAR S
CUP P,4,UPD$S131
UJP L17
L16 LAB
LOD A,2,68
IND I,4
LOC 150
LDC I,4
EQU I
FJP L18
MST 2,8,8
LOD A,2,12
PAR A
LDC I,-1
PAR I
CUP P,4,IMM$O064
UJP L19
L18 LAB
LOC 160
LDC B,0
NOT
FJP L20
MST 2,4,4
LCA 'FIT_IN_OP003'
PAR A
CUP P,2,ASSER003
L20 LAB
L19 LAB
L17 LAB
L15 LAB
L13 LAB
L10 LAB
L8 LAB
UJP L21
L5 LAB
LOD A,2,68
IND I,56
LOC 170
LDC I,0
EQU I
FJP L22
LOD A,2,68
IND I,72
XJP L23
L27 LAB
LOD A,2,68
IND I,64
LDC I,0
EQU I
LOC 180
FJP L28
MST 2,8,8
LOD A,2,12
PAR A
LDA 1,35500
LOD A,2,68
IND I,68
CHK J,1,8
DEC I,1
IXA 4
LOC 190
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
UJP L29
L28 LAB
LOD A,2,8
LDC B,1
STO B
L29 LAB
UJP L26
L30 LAB
LOD A,2,68
LOC 200
IND I,76
LDC I,0
EQU I
LOD A,2,68
INC A,60
LDA 1,4692
EQU M,12
AND
FJP L31
MST 2,8,8
LOC 210
LOD A,2,12
PAR A
LOD A,2,68
INC A,76
PAR A
CUP P,4,VPA$O135
UJP L32
L31 LAB
LOD A,2,8
LDC B,1
STO B
L32 LAB
LOC 220
UJP L26
L33 LAB
LOD A,2,8
LDC B,1
STO B
UJP L26
L23 DEF 0
L24 DEF 2
L25 LAB
UJP L27
UJP L30
UJP L33
L26 LAB
UJP L35
L22 LAB
LOD A,2,68
LOC 230
IND I,72
LDC I,0
GRT I
NOT
FJP L36
MST 2,4,4
LCA 'FIT_IN_OP004'
PAR A
CUP P,2,ASSER003
L36 LAB
LOD A,2,68
LOC 240
IND I,68
LDC I,0
EQU I
LOD A,2,68
IND I,72
LDC I,1
EQU I
AND
MST 2,4,4
LOD A,2,68
LOC 250
INC A,76
PAR A
CUP B,2,IS$SI125
AND
FJP L37
LOD A,2,68
IND I,56
LDC I,1
EQU I
FJP L38
LOC 260
MST 2,12,12
LOD A,2,12
PAR A
LOD A,2,68
IND I,88
CHK I,0,31
PAR I
LOD A,2,68
IND I,64
CHK I,-16777216,16777215
LOC 270
PAR I
CUP P,6,REGDI072
UJP L39
L38 LAB
MST 2,4,4
LOD A,2,68
IND I,64
CHK I,-16777216,16777215
PAR I
CUP B,2,FITS$056
FJP L40
LOC 280
MST 2,8,8
LOD A,2,12
PAR A
LDC I,0
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
LOD A,2,12
INC A,4
LOD A,2,68
LOC 290
IND I,88
CHK I,0,31
STO I
LOD A,2,12
INC A,8
LOD A,2,68
IND I,64
LDC I,4
DVI
CHK I,-32,31
LOC 300
STO I
UJP L41
L40 LAB
MST 2,12,12
LOD A,2,12
PAR A
LOD A,2,68
IND I,88
CHK I,0,31
PAR I
LOD A,2,68
LOC 310
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOD A,2,12
INC A,16
LDC I,1
CHK I,0,1
STO I
L41 LAB
L39 LAB
UJP L42
L37 LAB
LOC 320
LOD A,2,68
IND I,72
LDC I,1
EQU I
FJP L43
MST 2,4,4
LOD A,2,68
INC A,76
PAR A
CUP B,2,FITS$126
LOC 330
NOT
FJP L44
LOD A,2,8
LDC B,1
STO B
UJP L45
L44 LAB
LOD A,2,68
IND I,68
LDC I,0
GRT I
LOC 340
FJP L46
MST 2,12,12
LOD A,2,12
PAR A
LDA 1,35500
LOD A,2,68
IND I,68
CHK J,1,8
DEC I,1
IXA 4
LOC 350
IND I,0
CHK I,0,31
PAR I
LOD A,2,68
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
UJP L47
L46 LAB
MST 2,8,8
LOC 360
LOD A,2,12
PAR A
LOD A,2,68
IND I,64
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
L47 LAB
MST 2,8,8
LOD A,2,12
PAR A
LOC 370
LOD A,2,68
INC A,76
PAR A
CUP P,4,INSER134
L45 LAB
UJP L48
L43 LAB
LOD A,2,68
IND I,68
LDC I,0
GRT I
FJP L49
LOC 380
LOD A,2,8
LDC B,1
STO B
UJP L50
L49 LAB
MST 2,4,4
LOD A,2,68
INC A,96
PAR A
CUP B,2,IS$SI125
MST 2,4,4
LOC 390
LOD A,2,68
INC A,76
PAR A
CUP B,2,FITS$126
AND
FJP L51
MST 2,12,12
LOD A,2,12
PAR A
LOD A,2,68
LOC 400
IND I,108
CHK I,0,31
PAR I
LOD A,2,68
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
MST 2,8,8
LOD A,2,12
LOC 410
PAR A
LOD A,2,68
INC A,76
PAR A
CUP P,4,INSER134
UJP L52
L51 LAB
MST 2,4,4
LOD A,2,68
INC A,76
PAR A
LOC 420
CUP B,2,IS$SI125
MST 2,4,4
LOD A,2,68
INC A,96
PAR A
CUP B,2,FITS$126
AND
FJP L53
MST 2,12,12
LOD A,2,12
LOC 430
PAR A
LOD A,2,68
IND I,88
CHK I,0,31
PAR I
LOD A,2,68
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOC 440
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,68
INC A,96
PAR A
CUP P,4,INSER134
UJP L54
L53 LAB
LOD A,2,8
LDC B,1
LOC 450
STO B
L54 LAB
L52 LAB
L50 LAB
L48 LAB
LOD A,2,68
IND I,56
LDC I,2
EQU I
FJP L55
LOD A,2,12
INC A,16
LDC I,1
CHK I,0,1
LOC 460
STO I
L55 LAB
L42 LAB
L35 LAB
L21 LAB
L4 LAB
RET P
L1 DEF 72
SST P FIT$A136 2 12 0 0 12
LOC 0
FIT$A136 ENT P,2,L1 FIT_ADDRESS_ 1 1 1
LOD A,2,8
LDC B,0
STO B
LDA 1,35760
LOD I,2,16
CHK J,-1,30
INC I,1
IXA 116
STR A,2,20
LOC 10
LOD A,2,20
IND I,4
LDC I,3
EQU I
LOD A,2,20
IND I,56
LDC I,1
GRT I
IOR
FJP L2
LOC 20
LOD A,2,8
LDC B,1
STO B
UJP L3
L2 LAB
LOD A,2,20
IND I,72
XJP L4
L8 LAB
LOD A,2,20
IND I,56
LDC I,0
LOC 30
EQU I
NOT
FJP L9
MST 2,4,4
LCA 'FIT_ADDR 001'
PAR A
CUP P,2,ASSER003
L9 LAB
LOD A,2,20
IND I,60
LDC I,0
LOC 40
EQU I
FJP L10
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
IND I,64
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOC 50
UJP L11
L10 LAB
LOD A,2,20
IND I,68
LDC I,0
EQU I
FJP L12
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
LOC 60
IND I,64
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
UJP L13
L12 LAB
MST 2,12,12
LOD A,2,12
PAR A
LDA 1,35500
LOD A,2,20
LOC 70
IND I,68
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
PAR I
LOD A,2,20
IND I,64
CHK I,-16777216,16777215
LOC 80
PAR I
CUP P,6,REGDI072
L13 LAB
L11 LAB
UJP L7
L14 LAB
LOD A,2,20
IND I,68
LDC I,0
EQU I
MST 2,4,4
LOD A,2,20
INC A,76
LOC 90
PAR A
CUP B,2,IS$SI125
AND
FJP L15
LOD A,2,20
IND I,56
LDC I,0
EQU I
FJP L16
MST 2,12,12
LOC 100
LOD A,2,12
PAR A
LOD A,2,20
IND I,88
CHK I,0,31
PAR I
LOD A,2,20
IND I,64
CHK I,-16777216,16777215
PAR I
LOC 110
CUP P,6,REGDI072
UJP L17
L16 LAB
MST 2,4,4
LOD A,2,20
IND I,64
CHK I,-16777216,16777215
PAR I
CUP B,2,FITS$056
FJP L18
MST 2,8,8
LOC 120
LOD A,2,12
PAR A
LDC I,0
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
LOD A,2,12
INC A,4
LOD A,2,20
IND I,88
LOC 130
CHK I,0,31
STO I
LOD A,2,12
INC A,8
LOD A,2,20
IND I,64
LDC I,4
DVI
CHK I,-32,31
STO I
LOC 140
UJP L19
L18 LAB
MST 2,12,12
LOD A,2,12
PAR A
LOD A,2,20
IND I,88
CHK I,0,31
PAR I
LOD A,2,20
IND I,64
LOC 150
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOD A,2,12
INC A,16
LDC I,1
CHK I,0,1
STO I
L19 LAB
L17 LAB
UJP L20
L15 LAB
MST 2,4,4
LOC 160
LOD A,2,20
INC A,76
PAR A
CUP B,2,FITS$126
FJP L21
LOD A,2,20
IND I,68
LDC I,0
EQU I
FJP L22
LOC 170
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
IND I,64
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
UJP L23
L22 LAB
MST 2,12,12
LOC 180
LOD A,2,12
PAR A
LDA 1,35500
LOD A,2,20
IND I,68
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
LOC 190
PAR I
LOD A,2,20
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
L23 LAB
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
LOC 200
INC A,76
PAR A
CUP P,4,INSER134
LOD A,2,20
IND I,56
LDC I,1
EQU I
FJP L24
LOD A,2,12
INC A,16
LOC 210
LDC I,1
CHK I,0,1
STO I
L24 LAB
UJP L25
L21 LAB
LOD A,2,20
IND I,56
LDC I,0
EQU I
LOD A,2,20
INC A,60
LOC 220
LDA 1,4692
EQU M,12
AND
LOD A,2,20
IND I,76
LDC I,0
EQU I
AND
LOD A,2,20
IND I,80
LOC 230
LDC I,1
EQU I
AND
FJP L26
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
INC A,76
PAR A
LOC 240
CUP P,4,VPA$O135
LOD A,2,12
IND I,0
LDC I,1
EQU I
NOT
FJP L27
MST 2,4,4
LCA 'FIT_ADDR 002'
PAR A
LOC 250
CUP P,2,ASSER003
L27 LAB
LOD A,2,12
INC A,16
LDC I,1
CHK I,0,1
STO I
UJP L28
L26 LAB
LOD A,2,8
LDC B,1
STO B
L28 LAB
L25 LAB
L20 LAB
LOC 260
UJP L7
L29 LAB
LOD A,2,20
IND I,68
LDC I,0
GRT I
FJP L30
LOD A,2,8
LDC B,1
STO B
UJP L31
L30 LAB
LOC 270
MST 2,4,4
LOD A,2,20
INC A,76
PAR A
CUP B,2,IS$SI125
MST 2,4,4
LOD A,2,20
INC A,96
PAR A
CUP B,2,FITS$126
LOC 280
AND
FJP L32
MST 2,12,12
LOD A,2,12
PAR A
LOD A,2,20
IND I,88
CHK I,0,31
PAR I
LOD A,2,20
LOC 290
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
INC A,96
PAR A
LOC 300
CUP P,4,INSER134
LOD A,2,20
IND I,56
LDC I,1
EQU I
FJP L33
LOD A,2,12
INC A,16
LDC I,1
CHK I,0,1
LOC 310
STO I
L33 LAB
UJP L34
L32 LAB
MST 2,4,4
LOD A,2,20
INC A,96
PAR A
CUP B,2,IS$SI125
MST 2,4,4
LOD A,2,20
INC A,76
LOC 320
PAR A
CUP B,2,FITS$126
AND
FJP L35
MST 2,12,12
LOD A,2,12
PAR A
LOD A,2,20
IND I,108
CHK I,0,31
LOC 330
PAR I
LOD A,2,20
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
MST 2,8,8
LOD A,2,12
PAR A
LOD A,2,20
LOC 340
INC A,76
PAR A
CUP P,4,INSER134
LOD A,2,20
IND I,56
LDC I,1
EQU I
FJP L36
LOD A,2,12
INC A,16
LOC 350
LDC I,1
CHK I,0,1
STO I
L36 LAB
UJP L37
L35 LAB
LOD A,2,8
LDC B,1
STO B
L37 LAB
L34 LAB
L31 LAB
UJP L7
L4 DEF 0
L5 DEF 2
L6 LAB
UJP L8
UJP L14
LOC 360
UJP L29
L7 LAB
L3 LAB
RET P
L1 DEF 24
SST P GET$O108 2 8 0 52 8
LOC 0
GET$O108 ENT P,2,L1 GET_OPERAND 1 1 1
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,5
EQU I
FJP L2
LOC 10
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
IND I,8
LDC I,1
EQU I
FJP L3
MST 2,4,4
LOC 20
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,2,BJUMP120
L3 LAB
L2 LAB
MST 2,12,12
LDA 2,64
PAR A
LOD A,2,8
PAR A
LOD I,2,12
LOC 30
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
L4 LAB
LOD B,2,64
FJP L5
MST 2,4,4
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
LOC 40
MST 2,12,12
LDA 2,64
PAR A
LOD A,2,8
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
UJP L4
L5 LAB
LOC 50
RET P
L1 DEF 68
SST P GET$S137 2 8 0 56 8
LOC 0
GET$S137 ENT P,2,L1 GET_SHORT_OP 1 1 1
MST 2,8,8
LOD A,2,8
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOD A,2,8
IND I,0
LOC 10
LDC I,1
EQU I
FJP L2
MST 2,4,4
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,2,FREED090
LDA 1,30932
LDA 1,35760
LOC 20
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L3
MST 2,0,0
LOC 30
CUP P,0,FINDR083
UJP L4
L3 LAB
MST 2,0,0
CUP P,0,FINDR084
L4 LAB
MST 2,8,8
LDA 2,16
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
LOC 40
CUP P,4,REG$O063
MST 2,12,12
LDA 1,31060
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
LOC 50
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 2,16
PAR A
LOD A,2,8
PAR A
CUP P,6,EMITX077
MST 2,16,16
LOC 60
LOD I,2,12
CHK I,-1,30
PAR I
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
LOC 70
PAR A
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK I,0,15
PAR I
LOD I,1,35476
LOC 80
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOD A,2,8
LDA 2,16
MOV 56
L2 LAB
RET P
L1 DEF 72
SST P GET$A138 2 8 0 4 8
LOC 0
GET$A138 ENT P,2,L1 GET_ADDRESS 1 1 1
MST 2,12,12
LDA 2,16
PAR A
LOD A,2,8
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,6,FIT$A136
L2 LAB
LOC 10
LOD B,2,16
FJP L3
MST 2,4,4
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
MST 2,12,12
LDA 2,16
PAR A
LOC 20
LOD A,2,8
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,6,FIT$A136
UJP L2
L3 LAB
RET P
L1 DEF 20
SST P MOVE$110 2 8 0 108 8
LOC 0
MOVE$110 ENT P,2,L1 MOVE_QUANTIT 1 1 1
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
STR A,2,124
LOD A,2,124
IND I,4
LDC I,2
LOC 10
EQU I
LOD A,2,124
IND I,56
LDC I,0
EQU I
AND
FJP L2
MST 2,12,12
LDA 2,120
PAR A
LOC 20
LDA 2,64
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,120
FJP L3
MST 2,8,8
LDA 2,64
LOC 30
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LDC I,66
CHK I,0,285
PAR I
LOD A,2,8
LOC 40
PAR A
LDA 2,64
PAR A
CUP P,6,EMITX077
UJP L4
L3 LAB
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LOD A,2,8
LOC 50
PAR A
LDA 2,64
PAR A
CUP P,6,EMITX077
L4 LAB
UJP L5
L2 LAB
MST 2,8,8
LDA 2,64
PAR A
LOD I,2,12
CHK I,-1,30
LOC 60
PAR I
CUP P,4,GET$O108
LOD A,2,8
LDA 2,64
NEQ M,56
FJP L6
MST 2,12,12
LDA 1,31060
LOD A,2,124
IND I,4
LOC 70
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
PAR I
LOD A,2,8
PAR A
LDA 2,64
PAR A
CUP P,6,EMITX077
L6 LAB
L5 LAB
LOC 80
RET P
L1 DEF 128
SST P SLR$Q139 2 12 56 60 12
LOC 0
SLR$Q139 ENT P,2,L1 SLR_QUANTITY 1 1 1
LDA 2,20
LOD A,2,8
MOV 56
LDA 1,35760
LOD I,2,16
CHK J,-1,30
INC I,1
IXA 116
STR A,2,136
LOC 10
LOD A,2,136
IND I,4
LDC I,2
EQU I
LOD A,2,136
IND I,56
LDC I,0
EQU I
AND
FJP L2
LOC 20
MST 2,12,12
LDA 2,132
PAR A
LDA 2,76
PAR A
LOD I,2,16
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,132
LOC 30
FJP L3
MST 2,8,8
LDA 2,76
PAR A
LOD I,2,16
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LDA 1,31764
LOC 40
LOD I,2,12
CHK J,0,31
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 2,20
PAR A
LDA 2,76
PAR A
LOC 50
CUP P,6,EMITX077
UJP L4
L3 LAB
MST 2,12,12
LDA 1,31636
LOD I,2,12
CHK J,0,31
IXA 4
IND I,0
CHK I,0,285
PAR I
LOC 60
LDA 2,20
PAR A
LDA 2,76
PAR A
CUP P,6,EMITX077
L4 LAB
UJP L5
L2 LAB
MST 2,8,8
LDA 2,76
PAR A
LOD I,2,16
LOC 70
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,12,12
LDA 1,31636
LOD I,2,12
CHK J,0,31
IXA 4
IND I,0
CHK I,0,285
LOC 80
PAR I
LDA 2,20
PAR A
LDA 2,76
PAR A
CUP P,6,EMITX077
L5 LAB
RET P
L1 DEF 140
SST P COERC140 2 12 0 64 12
LOC 0
COERC140 ENT P,2,L1 COERCE_AND_M 1 1 1
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
STR A,2,84
LOD A,2,84
IND I,4
LDC I,2
LOC 10
EQU I
LOD I,2,16
LDC I,2
EQU I
AND
LOD A,2,84
IND I,56
LDC I,0
EQU I
AND
LOC 20
FJP L2
MST 2,12,12
LDA 2,80
PAR A
LDA 2,20
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOC 30
LOD B,2,80
FJP L3
MST 2,8,8
LDA 2,20
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LOC 40
LDC I,66
CHK I,0,285
PAR I
LOD A,2,8
PAR A
LDA 2,20
PAR A
CUP P,6,EMITX077
UJP L4
L3 LAB
MST 2,12,12
LOC 50
LDC I,75
CHK I,0,285
PAR I
LOD A,2,8
PAR A
LDA 2,20
PAR A
CUP P,6,EMITX077
L4 LAB
UJP L5
L2 LAB
MST 2,8,8
LOC 60
LDA 2,20
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LOD A,2,8
PAR A
LDA 2,20
LOC 70
PAR A
CUP B,4,EQUAL062
NOT
LOD A,2,84
IND I,4
LOD I,2,16
NEQ I
IOR
FJP L6
LDA 1,32084
LOC 80
LOD I,2,16
CHK J,0,15
IXA 64
LOD A,2,84
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
STR I,2,76
LOC 90
LOD I,2,76
LDC I,0
EQU I
FJP L7
MST 2,4,4
LDC I,9
CHK I,0,68
PAR I
CUP P,2,ERROR005
L7 LAB
MST 2,12,12
LOC 100
LOD I,2,76
CHK I,0,285
PAR I
LOD A,2,8
PAR A
LDA 2,20
PAR A
CUP P,6,EMITX077
L6 LAB
L5 LAB
RET P
L1 DEF 88
SST P STORE141 2 8 0 60 8
LOC 0
STORE141 ENT P,2,L1 STORE 1 1 1
LDA 1,32084
LOD I,1,52
CHK J,0,15
IXA 64
LDA 1,35760
LOD I,2,12
CHK J,-1,30
INC I,1
IXA 116
LOC 10
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
STR I,2,72
LOD I,2,72
LDC I,0
EQU I
FJP L2
LOC 20
MST 2,4,4
LDC I,19
CHK I,0,68
PAR I
CUP P,2,ERROR005
L2 LAB
MST 2,8,8
LDA 2,16
PAR A
LOD I,2,8
CHK I,-1,30
LOC 30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LDA 2,16
PAR A
LOD I,2,12
CHK I,-1,30
PAR I
LOD I,1,52
CHK I,0,15
LOC 40
PAR I
CUP P,6,COERC140
RET P
L1 DEF 76
SST P ADD$S112 2 20 0 48 20
SST P INC$O142 3 8 0 60 8
LOC 0
INC$O142 ENT P,3,L1 INC_OR_DEC 1 1 1
LOD I,3,8
LDC I,1
EQU I
FJP L2
LDC I,62
CHK I,0,285
STR I,3,72
UJP L3
L2 LAB
LDC I,40
LOC 10
CHK I,0,285
STR I,3,72
L3 LAB
MST 2,4,4
LOD A,3,12
PAR A
CUP B,2,IS$T$058
FJP L4
LOD A,2,8
LOD A,3,12
IND I,4
LOC 20
CHK I,0,31
STO I
UJP L5
L4 LAB
MST 2,0,0
CUP P,0,FINDR084
LOD A,2,8
LOD I,1,35476
CHK I,0,31
STO I
L5 LAB
MST 2,8,8
LOC 30
LDA 3,16
PAR A
LOD A,2,8
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOD I,3,72
CHK I,0,285
LOC 40
PAR I
LDA 3,16
PAR A
LOD A,3,12
PAR A
CUP P,6,EMITX077
RET P
L1 DEF 76
LOC 0
ADD$S112 ENT P,2,L1 ADD_SUB_SING 1 1 1
MST 2,4,4
LOD A,2,16
PAR A
CUP B,2,ISSHO060
LOD A,2,16
IND I,8
LDC I,1
EQU I
LOD A,2,16
LOC 10
IND I,8
LDC I,1
NGI
EQU I
IOR
AND
FJP L2
LOD I,2,12
LDC I,8
EQU I
LOC 20
FJP L3
MST 3,8,8
LOD A,2,16
IND I,8
PAR I
LOD A,2,20
PAR A
CUP P,4,INC$O142
UJP L4
L3 LAB
MST 3,8,8
LOC 30
LOD A,2,16
IND I,8
NGI
PAR I
LOD A,2,20
PAR A
CUP P,4,INC$O142
L4 LAB
UJP L5
L2 LAB
MST 2,4,4
LOD A,2,20
LOC 40
PAR A
CUP B,2,ISSHO060
LOD A,2,20
IND I,8
LDC I,1
EQU I
LOD A,2,20
IND I,8
LDC I,1
NGI
LOC 50
EQU I
IOR
AND
FJP L6
LOD I,2,12
LDC I,8
EQU I
FJP L7
MST 3,8,8
LOD A,2,20
LOC 60
IND I,8
PAR I
LOD A,2,16
PAR A
CUP P,4,INC$O142
UJP L8
L7 LAB
MST 3,8,8
LOD A,2,20
IND I,8
NGI
LOC 70
PAR I
LOD A,2,16
PAR A
CUP P,4,INC$O142
L8 LAB
UJP L9
L6 LAB
MST 2,32,32
LOD A,2,8
PAR A
LOD I,2,12
CHK I,0,285
LOC 80
PAR I
LOD A,2,16
PAR A
LOD A,2,20
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
LOC 90
PAR B
LOD I,2,24
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
L9 LAB
L5 LAB
RET P
L1 DEF 76
SST P ADD$T143 2 0 0 136 0
LOC 0
ADD$T143 ENT P,2,L1 ADD_TOP_TWO_ 1 1 1
LDC B,0
STR B,2,11
LDC B,0
STR B,2,10
L2 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 10
IND I,72
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
LOC 20
EQU M,12
AND
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
LOC 30
AND
FJP L3
LDC B,1
STR B,2,11
UJP L4
L3 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 40
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 50
INC I,1
IXA 116
INC A,60
LDA 1,4692
EQU M,12
AND
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 60
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
AND
FJP L5
LDC B,1
STR B,2,11
LOC 70
UJP L6
L5 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LDA 1,35760
LOC 80
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
AND
LOC 90
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,68
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
LOC 100
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
AND
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 110
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,68
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 120
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
NEQ I
AND
IOR
AND
LOC 130
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 140
CHK J,-1,30
INC I,1
IXA 116
IND I,72
ADI
LDC I,2
LEQ I
AND
FJP L7
LDC B,1
LOC 150
STR B,2,11
UJP L8
L7 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LOC 160
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LOC 170
AND
FJP L9
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
LOC 180
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
ADI
STR I,2,12
LDA 1,35760
LOD I,1,39472
LOC 190
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDC I,0
STO I
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 200
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDC I,0
STO I
UJP L10
L9 LAB
LDC I,0
STR I,2,12
L10 LAB
MST 2,12,12
LOC 210
LDA 2,9
PAR A
LDA 2,72
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOC 220
MST 2,12,12
LDA 2,8
PAR A
LDA 2,16
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,9
LOC 230
NOT
LOD B,2,8
NOT
AND
FJP L11
LDC B,1
STR B,2,10
UJP L12
L11 LAB
LOD B,2,9
NOT
LOC 240
FJP L13
LOD I,1,39472
CHK I,-1,30
STR I,2,132
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,2,128
UJP L14
L13 LAB
LOC 250
LOD B,2,8
NOT
FJP L15
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,2,132
LOD I,1,39472
CHK I,-1,30
LOC 260
STR I,2,128
UJP L16
L15 LAB
LOD I,1,39472
CHK I,-1,30
STR I,2,132
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,2,128
L16 LAB
L14 LAB
LOC 270
LOD I,2,12
LDC I,0
NEQ I
FJP L17
LDA 1,35760
LOD I,2,132
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LOC 280
LDC I,0
EQU I
LDA 1,35760
LOD I,2,132
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,0
EQU I
LOC 290
AND
NOT
FJP L18
MST 2,4,4
LCA 'ADD_TOP_T001'
PAR A
CUP P,2,ASSER003
L18 LAB
LDA 1,35760
LOD I,2,132
CHK J,-1,30
LOC 300
INC I,1
IXA 116
INC A,64
LOD I,2,12
STO I
L17 LAB
MST 2,4,4
LOD I,2,132
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
L12 LAB
L8 LAB
L6 LAB
L4 LAB
LOC 310
LOD B,2,11
LOD B,2,10
IOR
FJP L2
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 320
IXA 116
IND I,4
LDC I,3
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LOC 330
LDC I,3
EQU I
IOR
FJP L19
LDC I,3
CHK I,0,15
STR I,2,140
UJP L20
L19 LAB
LDA 1,35760
LOD I,1,39472
LOC 340
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,2
EQU I
LDA 1,35760
LOD I,1,39472
LOC 350
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,2
EQU I
IOR
FJP L21
LDC I,2
CHK I,0,15
LOC 360
STR I,2,140
UJP L22
L21 LAB
LDC I,10
CHK I,0,15
STR I,2,140
L22 LAB
L20 LAB
LOD B,2,10
FJP L23
MST 2,20,20
LDA 2,136
PAR A
LOC 370
LDC I,8
CHK I,0,285
PAR I
LDA 2,72
PAR A
LDA 2,16
PAR A
LOD I,1,39472
LDC I,1
SBI
LOC 380
CHK I,-1,30
PAR I
CUP P,10,ADD$S112
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,136
CHK I,0,31
PAR I
LOC 390
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,136
CHK I,0,31
PAR I
LOC 400
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 410
IND A,0
CHK A,-1,0
PAR A
LOD I,2,140
CHK I,0,15
PAR I
LOD I,2,136
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOC 420
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,4
LOD I,2,140
CHK I,0,15
STO I
UJP L24
L23 LAB
LOC 430
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
LOC 440
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
EQU M,12
LOC 450
AND
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,3
LOC 460
NEQ I
AND
FJP L25
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 470
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
MOV 116
UJP L26
L25 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 480
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 490
INC A,60
LDA 1,4692
EQU M,12
AND
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LOC 500
LDC I,3
NEQ I
AND
FJP L27
UJP L28
L27 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 510
IND I,68
LDC I,0
NEQ I
FJP L29
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 520
IXA 116
INC A,68
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,68
CHK I,0,8
STO I
L29 LAB
LOC 530
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDA 1,35760
LOD I,1,39472
LOC 540
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 550
IXA 116
IND I,64
ADI
STO I
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 560
IXA 116
IND I,72
LDC I,0
EQU I
FJP L30
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 570
IND I,72
LDC I,0
GRT I
FJP L31
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 580
IXA 116
INC A,76
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,76
MOV 20
L31 LAB
LDA 1,35760
LOC 590
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,2
EQU I
FJP L32
LDA 1,35760
LOD I,1,39472
LOC 600
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,96
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 610
IXA 116
INC A,96
MOV 20
L32 LAB
UJP L33
L30 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 620
IXA 116
IND I,72
LDC I,1
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LOC 630
LDC I,1
EQU I
AND
FJP L34
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 640
IXA 116
INC A,96
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,76
MOV 20
L34 LAB
L33 LAB
LDA 1,35760
LOC 650
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,72
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 660
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 670
IND I,72
ADI
CHK I,0,2
STO I
L28 LAB
L26 LAB
LOD I,1,35492
LOD I,1,39472
EQU I
FJP L35
LOD I,1,39472
LDC I,1
LOC 680
SBI
CHK I,-1,30
STR I,1,35492
L35 LAB
MST 2,0,0
CUP P,0,POPTO129
L24 LAB
RET P
L1 DEF 144
SST P MULT$144 2 16 0 60 16
LOC 0
MULT$144 ENT P,2,L1 MULT_SINGLE 1 1 1
MST 2,4,4
LOD A,2,12
PAR A
CUP B,2,ISSHO060
FJP L2
MST 2,4,4
LOD A,2,12
IND I,8
PAR I
LOC 10
CUP I,2,POWER031
STR I,2,24
LOD I,2,24
LDC I,0
GEQ I
FJP L3
MST 2,8,8
LDA 2,28
PAR A
LOD I,2,24
LOC 20
PAR I
CUP P,4,IMM$O064
MST 2,32,32
LOD A,2,8
PAR A
LDC I,167
CHK I,0,285
PAR I
LOD A,2,16
PAR A
LOC 30
LDA 2,28
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOD I,2,20
CHK I,-1,30
LOC 40
PAR I
CUP P,16,ALLOC107
UJP L4
L3 LAB
MST 2,32,32
LOD A,2,8
PAR A
LDC I,147
CHK I,0,285
PAR I
LOD A,2,12
LOC 50
PAR A
LOD A,2,16
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOD I,2,20
LOC 60
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
L4 LAB
UJP L5
L2 LAB
MST 2,4,4
LOD A,2,16
PAR A
CUP B,2,ISSHO060
FJP L6
MST 2,4,4
LOC 70
LOD A,2,16
IND I,8
PAR I
CUP I,2,POWER031
STR I,2,24
LOD I,2,24
LDC I,0
GEQ I
FJP L7
MST 2,8,8
LOC 80
LDA 2,28
PAR A
LOD I,2,24
PAR I
CUP P,4,IMM$O064
MST 2,32,32
LOD A,2,8
PAR A
LDC I,167
CHK I,0,285
LOC 90
PAR I
LOD A,2,12
PAR A
LDA 2,28
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
LOC 100
PAR B
LOD I,2,20
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
UJP L8
L7 LAB
MST 2,32,32
LOD A,2,8
PAR A
LDC I,147
LOC 110
CHK I,0,285
PAR I
LOD A,2,12
PAR A
LOD A,2,16
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LOC 120
LDC B,0
PAR B
LOD I,2,20
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
L8 LAB
UJP L9
L6 LAB
MST 2,32,32
LOD A,2,8
PAR A
LOC 130
LDC I,147
CHK I,0,285
PAR I
LOD A,2,12
PAR A
LOD A,2,16
PAR A
LDC B,0
PAR B
LDC B,0
LOC 140
PAR B
LDC B,0
PAR B
LOD I,2,20
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
L9 LAB
L5 LAB
RET P
L1 DEF 84
SST P SIMPL111 2 4 0 60 4
SST P ADD$V145 3 0 0 116 0
LOC 0
ADD$V145 ENT P,3,L1 ADD_VPAS 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,124
LOD A,3,124
IND I,76
LDC I,0
LOC 10
EQU I
LOD A,3,124
IND I,96
LDC I,0
EQU I
AND
NOT
FJP L2
MST 2,4,4
LCA 'ADD_VPAS 001'
LOC 20
PAR A
CUP P,2,ASSER003
L2 LAB
LOD A,3,124
IND I,56
LDC I,0
GRT I
LOD A,3,124
IND I,4
ORD
CHK S,0,63
LOC 30
LDC S,(0,0,0,1036)
INN
IOR
NOT
FJP L3
MST 2,4,4
LCA 'ADD_VPAS 002'
PAR A
CUP P,2,ASSER003
L3 LAB
MST 2,8,8
LOC 40
LDA 3,64
PAR A
LOD A,3,124
INC A,76
PAR A
CUP P,4,VPA$O135
MST 2,8,8
LDA 3,8
PAR A
LOD A,3,124
LOC 50
INC A,96
PAR A
CUP P,4,VPA$O135
MST 2,32,32
LDA 3,120
PAR A
LDC I,8
CHK I,0,285
PAR I
LDA 3,64
LOC 60
PAR A
LDA 3,8
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOD I,2,8
LOC 70
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD A,3,124
INC A,76
PAR A
LOD I,3,120
CHK I,0,31
PAR I
LOC 80
CUP P,4,FREEV094
MST 2,8,8
LOD A,3,124
INC A,96
PAR A
LOD I,3,120
CHK I,0,31
PAR I
CUP P,4,FREEV094
LOD A,3,124
LOC 90
INC A,76
LDA 1,4704
MOV 20
LOD A,3,124
INC A,96
LDA 1,4704
MOV 20
LOD A,3,124
INC A,72
LDC I,1
LOC 100
CHK I,0,2
STO I
LOD A,3,124
INC A,84
LDC I,0
STO I
LOD A,3,124
INC A,88
LOD I,3,120
CHK I,0,31
LOC 110
STO I
RET P
L1 DEF 128
SST P FPA$L146 3 4 0 60 4
LOC 0
FPA$L146 ENT P,3,L1 FPA_LVL_PLUS 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,72
LOD A,3,72
IND I,68
LDC I,0
LOC 10
GRT I
LOD A,3,72
IND I,4
LDC I,2
EQU I
LOD A,3,72
IND I,56
LDC I,0
GRT I
IOR
LOC 20
AND
NOT
FJP L2
MST 2,4,4
LCA 'FPLVL_VPA001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,8,8
LDA 3,12
PAR A
LOC 30
LDA 1,35500
LOD A,3,72
IND I,68
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOC 40
MST 2,32,32
LDA 3,68
PAR A
LDC I,8
CHK I,0,285
PAR I
LOD A,3,8
PAR A
LDA 3,12
PAR A
LOC 50
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
LOC 60
MST 2,8,8
LOD A,3,72
INC A,76
PAR A
LOD I,3,68
CHK I,0,31
PAR I
CUP P,4,FREEV094
LOD A,3,72
INC A,76
LOC 70
LDA 1,4704
MOV 20
LOD A,3,72
INC A,68
LDC I,0
CHK I,0,8
STO I
LOD A,3,72
INC A,84
LDC I,0
LOC 80
STO I
LOD A,3,72
INC A,88
LOD I,3,68
CHK I,0,31
STO I
RET P
L1 DEF 76
SST P FPA$D147 3 4 0 60 4
LOC 0
FPA$D147 ENT P,3,L1 FPA_DSPLMT_P 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,72
LOD A,3,72
IND I,56
LDC I,0
LOC 10
EQU I
LOD A,3,72
IND I,4
LDC I,10
EQU I
AND
NOT
FJP L2
MST 2,4,4
LCA 'FDSP_VPA 001'
LOC 20
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,8,8
LDA 3,12
PAR A
LOD A,3,72
IND I,64
PAR I
CUP P,4,IMM$O064
MST 2,20,20
LOC 30
LDA 3,68
PAR A
LDC I,8
CHK I,0,285
PAR I
LOD A,3,8
PAR A
LDA 3,12
PAR A
LOD I,2,8
LOC 40
CHK I,-1,30
PAR I
CUP P,10,ADD$S112
MST 2,8,8
LOD A,3,72
INC A,76
PAR A
LOD I,3,68
CHK I,0,31
PAR I
LOC 50
CUP P,4,FREEV094
LOD A,3,72
INC A,64
LDC I,0
STO I
LOD A,3,72
INC A,76
LDA 1,4704
MOV 20
LOD A,3,72
LOC 60
INC A,84
LDC I,0
STO I
LOD A,3,72
INC A,88
LOD I,3,68
CHK I,0,31
STO I
RET P
L1 DEF 76
SST P VPA$F148 3 0 0 116 0
LOC 0
VPA$F148 ENT P,3,L1 VPA_FPA_FINA 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,124
MST 2,4,4
LOD A,3,124
INC A,76
LOC 10
PAR A
CUP B,2,IS$SI125
LOD A,3,124
IND I,4
LDC I,3
NEQ I
AND
LOD A,3,124
IND I,68
LDC I,0
LOC 20
EQU I
AND
MST 2,4,4
LOD A,3,124
IND I,64
CHK I,-16777216,16777215
PAR I
CUP B,2,FITS$056
AND
FJP L2
LOC 30
LOD A,3,124
IND I,56
LDC I,2
EQU I
FJP L3
MST 2,8,8
LDA 3,8
PAR A
LDC I,0
CHK I,0,1073741823
LOC 40
PAR I
CUP P,4,ADDR$075
LOD A,3,124
IND I,88
CHK I,0,31
STR I,3,12
LOD A,3,124
IND I,64
LDC I,4
DVI
LOC 50
CHK I,-32,31
STR I,3,16
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,2,FREED090
LDA 1,31060
LOD A,3,124
IND I,4
LOC 60
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
STR I,3,120
LDA 1,30932
LOD A,3,124
IND I,4
CHK J,0,15
IXA 1
LOC 70
IND B,0
FJP L4
MST 2,0,0
CUP P,0,FINDR083
UJP L5
L4 LAB
MST 2,0,0
CUP P,0,FINDR084
L5 LAB
UJP L6
L3 LAB
MST 2,12,12
LDA 3,8
LOC 80
PAR A
LOD A,3,124
IND I,88
CHK I,0,31
PAR I
LOD A,3,124
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
LOC 90
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,2,FREED090
LOD A,3,124
IND I,56
LDC I,0
EQU I
FJP L7
LOC 100
LDC I,66
CHK I,0,285
STR I,3,120
MST 2,0,0
CUP P,0,FINDR084
UJP L8
L7 LAB
LDA 1,31060
LOD A,3,124
IND I,4
CHK J,0,15
LOC 110
IXA 4
IND I,0
CHK I,0,285
STR I,3,120
LDA 1,30932
LOD A,3,124
IND I,4
CHK J,0,15
IXA 1
IND B,0
LOC 120
FJP L9
MST 2,0,0
CUP P,0,FINDR083
UJP L10
L9 LAB
MST 2,0,0
CUP P,0,FINDR084
L10 LAB
L8 LAB
L6 LAB
MST 2,16,16
LOD I,2,8
CHK I,-1,30
PAR I
LOC 130
LOD A,3,124
IND A,0
CHK A,-1,0
PAR A
LOD A,3,124
IND I,4
CHK I,0,15
PAR I
LOD I,1,35476
CHK I,0,31
LOC 140
PAR I
CUP P,8,REG$D113
MST 2,8,8
LDA 3,64
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOC 150
LOD I,3,120
CHK I,0,285
PAR I
LDA 3,64
PAR A
LDA 3,8
PAR A
CUP P,6,EMITX077
UJP L11
L2 LAB
LOD A,3,124
LOC 160
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
LOD A,3,124
IND I,56
LDC I,0
GRT I
IOR
LOC 170
LOD A,3,124
IND I,72
LDC I,1
EQU I
AND
MST 2,4,4
LOD A,3,124
INC A,76
PAR A
CUP B,2,FITS$126
LOC 180
AND
NOT
FJP L12
MST 2,4,4
LCA 'VP_FP_FIN001'
PAR A
CUP P,2,ASSER003
L12 LAB
LOD A,3,124
IND I,68
LDC I,0
LOC 190
GRT I
FJP L13
MST 2,12,12
LDA 3,8
PAR A
LDA 1,35500
LOD A,3,124
IND I,68
CHK J,1,8
DEC I,1
LOC 200
IXA 4
IND I,0
CHK I,0,31
PAR I
LOD A,3,124
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
UJP L14
L13 LAB
LOC 210
LOD A,3,124
IND I,4
LDC I,3
NEQ I
FJP L15
MST 2,8,8
LDA 3,8
PAR A
LOD A,3,124
IND I,64
LOC 220
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
UJP L16
L15 LAB
MST 2,12,12
LDA 3,8
PAR A
LDC I,3
CHK I,0,31
PAR I
LOC 230
LOD A,3,124
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LDC I,1
CHK I,0,5
STR I,3,56
LOD A,3,124
INC A,4
LOC 240
LDC I,2
CHK I,0,15
STO I
L16 LAB
L14 LAB
MST 2,8,8
LDA 3,8
PAR A
LOD A,3,124
INC A,76
PAR A
CUP P,4,INSER134
LOC 250
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,2,FREED090
LOD A,3,124
IND I,56
LDC I,0
EQU I
FJP L17
LOC 260
LDC I,66
CHK I,0,285
STR I,3,120
MST 2,0,0
CUP P,0,FINDR084
UJP L18
L17 LAB
LDA 1,31060
LOD A,3,124
IND I,4
CHK J,0,15
LOC 270
IXA 4
IND I,0
CHK I,0,285
STR I,3,120
LDA 1,30932
LOD A,3,124
IND I,4
CHK J,0,15
IXA 1
IND B,0
LOC 280
FJP L19
MST 2,0,0
CUP P,0,FINDR083
UJP L20
L19 LAB
MST 2,0,0
CUP P,0,FINDR084
L20 LAB
LOD A,3,124
IND I,56
LDC I,2
EQU I
LOC 290
FJP L21
LDC I,1
CHK I,0,1
STR I,3,24
L21 LAB
L18 LAB
MST 2,16,16
LOD I,2,8
CHK I,-1,30
PAR I
LOD A,3,124
IND A,0
LOC 300
CHK A,-1,0
PAR A
LOD A,3,124
IND I,4
CHK I,0,15
PAR I
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOC 310
MST 2,8,8
LDA 3,64
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOD I,3,120
CHK I,0,285
LOC 320
PAR I
LDA 3,64
PAR A
LDA 3,8
PAR A
CUP P,6,EMITX077
L11 LAB
RET P
L1 DEF 128
SST P SHORT149 3 8 0 116 8
LOC 0
SHORT149 ENT P,3,L1 SHORT_AND_RE 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,132
LOD A,3,132
IND I,4
ORD
LOC 10
CHK S,0,63
LDC S,(0,0,0,12)
INN
LOD A,3,132
IND I,56
LDC I,0
GRT I
IOR
NOT
FJP L2
LOC 20
MST 2,4,4
LCA 'SHORT®001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,12,12
LDA 3,16
PAR A
LOD A,3,12
IND I,12
CHK I,0,31
LOC 30
PAR I
LOD A,3,132
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
MST 2,8,8
LDA 3,16
PAR A
LOD A,3,8
LOC 40
PAR A
CUP P,4,INSER134
LOD A,3,132
INC A,64
LDC I,0
STO I
MST 2,4,4
LOD A,3,132
INC A,76
PAR A
LOC 50
CUP P,2,FREEV093
MST 2,4,4
LOD A,3,132
INC A,96
PAR A
CUP P,2,FREEV093
LOD A,3,132
INC A,76
LDA 1,4704
MOV 20
LOC 60
LOD A,3,132
INC A,96
LDA 1,4704
MOV 20
LOD A,3,132
INC A,72
LDC I,1
CHK I,0,2
STO I
LOD A,3,132
LOC 70
IND I,56
LDC I,0
EQU I
LOD A,3,132
IND I,68
LDC I,0
GRT I
IOR
LOD A,3,132
IND I,4
LOC 80
LDC I,3
EQU I
IOR
FJP L3
LDC I,66
CHK I,0,285
STR I,3,128
MST 2,0,0
CUP P,0,FINDR084
UJP L4
L3 LAB
LOC 90
LDA 1,31060
LOD A,3,132
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
STR I,3,128
LDA 1,30932
LOD A,3,132
LOC 100
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L5
MST 2,0,0
CUP P,0,FINDR083
UJP L6
L5 LAB
MST 2,0,0
CUP P,0,FINDR084
L6 LAB
LOC 110
LOD A,3,132
IND I,56
LDC I,2
EQU I
FJP L7
LDC I,1
CHK I,0,1
STR I,3,32
L7 LAB
LOD A,3,132
INC A,56
LOC 120
LDC I,0
CHK I,0,2
STO I
L4 LAB
LOD A,3,132
INC A,84
LDC I,0
STO I
LOD A,3,132
INC A,88
LOD I,1,35476
LOC 130
CHK I,0,31
STO I
MST 2,8,8
LDA 3,72
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOC 140
LOD I,3,128
CHK I,0,285
PAR I
LDA 3,72
PAR A
LDA 3,16
PAR A
CUP P,6,EMITX077
RET P
L1 DEF 136
SST P CALCU150 3 0 0 112 0
LOC 0
CALCU150 ENT P,3,L1 CALCULATE_FP 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,120
LOD A,3,120
IND I,4
ORD
LOC 10
CHK S,0,63
LDC S,(0,0,0,12)
INN
LOD A,3,120
IND I,72
LDC I,0
EQU I
AND
LOD A,3,120
IND I,56
LOC 20
LDC I,0
EQU I
AND
NOT
FJP L2
MST 2,4,4
LCA 'CALC_FPA 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,0,0
LOC 30
CUP P,0,FINDR084
MST 2,8,8
LDA 3,64
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOD A,3,120
IND I,4
LOC 40
LDC I,3
NEQ I
FJP L3
MST 2,12,12
LDA 3,8
PAR A
LDA 1,35500
LOD A,3,120
IND I,68
CHK J,1,8
LOC 50
DEC I,1
IXA 4
IND I,0
CHK I,0,31
PAR I
LOD A,3,120
IND I,64
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
LOC 60
UJP L4
L3 LAB
MST 2,12,12
LDA 3,8
PAR A
LDC I,3
CHK I,0,31
PAR I
LOD A,3,120
IND I,64
CHK I,-16777216,16777215
LOC 70
PAR I
CUP P,6,EXTEN073
LDC I,1
CHK I,0,5
STR I,3,56
LOD A,3,120
INC A,4
LDC I,2
CHK I,0,15
STO I
L4 LAB
LOC 80
LOD A,3,120
INC A,60
LDA 1,4692
MOV 12
LOD A,3,120
INC A,72
LDC I,1
CHK I,0,2
STO I
LOD A,3,120
LOC 90
INC A,84
LDC I,0
STO I
LOD A,3,120
INC A,88
LOD I,1,35476
CHK I,0,31
STO I
MST 2,12,12
LDC I,66
LOC 100
CHK I,0,285
PAR I
LDA 3,64
PAR A
LDA 3,8
PAR A
CUP P,6,EMITX077
RET P
L1 DEF 124
SST P DEREF151 3 4 0 116 4
LOC 0
DEREF151 ENT P,3,L1 DEREF_AND_SH 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,128
LOD A,3,128
IND I,56
LDC I,0
LOC 10
GRT I
LOD A,3,128
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,1036)
INN
IOR
NOT
FJP L2
LOC 20
MST 2,4,4
LCA 'DEREFSHFT001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,8,8
LDA 3,68
PAR A
LOD A,3,8
PAR A
CUP P,4,VPA$O135
LOC 30
MST 2,8,8
LDA 3,12
PAR A
LOD A,3,8
IND I,0
PAR I
CUP P,4,IMM$O064
MST 2,32,32
LDA 3,124
PAR A
LOC 40
LDC I,167
CHK I,0,285
PAR I
LDA 3,68
PAR A
LDA 3,12
PAR A
LDC B,0
PAR B
LDC B,0
LOC 50
PAR B
LDC B,0
PAR B
LOD I,2,8
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD A,3,8
PAR A
LOC 60
LOD I,3,124
CHK I,0,31
PAR I
CUP P,4,FREEV094
LOD A,3,8
LDA 1,4704
MOV 20
LOD A,3,8
INC A,8
LDC I,0
LOC 70
STO I
LOD A,3,8
INC A,12
LOD I,3,124
CHK I,0,31
STO I
RET P
L1 DEF 132
SST P SHIFT152 3 4 0 60 4
LOC 0
SHIFT152 ENT P,3,L1 SHIFT_VPA1 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,72
LOD A,3,72
IND I,56
LDC I,0
LOC 10
GRT I
LOD A,3,72
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,1036)
INN
IOR
NOT
FJP L2
LOC 20
MST 2,4,4
LCA 'SHIFTVPA 001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,8,8
LDA 3,12
PAR A
LOD A,3,72
IND I,76
PAR I
LOC 30
CUP P,4,IMM$O064
MST 2,32,32
LDA 3,68
PAR A
LDC I,167
CHK I,0,285
PAR I
LOD A,3,8
PAR A
LDA 3,12
LOC 40
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOD I,2,8
CHK I,-1,30
PAR I
LOC 50
CUP P,16,ALLOC107
MST 2,8,8
LOD A,3,72
INC A,76
PAR A
LOD I,3,68
CHK I,0,31
PAR I
CUP P,4,FREEV094
LOD A,3,72
LOC 60
INC A,76
LDA 1,4704
MOV 20
LOD A,3,72
INC A,84
LDC I,0
STO I
LOD A,3,72
INC A,88
LOD I,3,68
LOC 70
CHK I,0,31
STO I
RET P
L1 DEF 76
SST P DEREF153 3 8 0 56 8
LOC 0
DEREF153 ENT P,3,L1 DEREF 1 1 1
MST 2,4,4
LOD A,3,8
PAR A
CUP P,2,FREEV093
MST 2,0,0
CUP P,0,FINDR084
MST 2,8,8
LDA 3,16
PAR A
LOC 10
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 3,16
PAR A
LOC 20
LOD A,3,12
PAR A
CUP P,6,EMITX077
LOD A,3,8
LDA 1,4704
MOV 20
LOD A,3,8
INC A,8
LDC I,0
STO I
LOC 30
LOD A,3,8
INC A,12
LOD I,1,35476
CHK I,0,31
STO I
RET P
L1 DEF 72
SST P DEREF154 3 12 0 56 12
LOC 0
DEREF154 ENT P,3,L1 DEREF_TO_END 1 1 1
MST 2,4,4
LOD A,3,8
PAR A
CUP P,2,FREEV093
LDA 1,30932
LOD I,3,16
CHK J,0,15
IXA 1
IND B,0
LOC 10
FJP L2
MST 2,0,0
CUP P,0,FINDR083
UJP L3
L2 LAB
MST 2,0,0
CUP P,0,FINDR084
L3 LAB
MST 2,8,8
LDA 3,20
PAR A
LOD I,1,35476
LOC 20
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 1,31060
LOD I,3,16
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
LOC 30
PAR I
LDA 3,20
PAR A
LOD A,3,12
PAR A
CUP P,6,EMITX077
LOD A,3,8
LDA 1,4704
MOV 20
LOD A,3,8
LOC 40
INC A,8
LDC I,0
STO I
LOD A,3,8
INC A,12
LOD I,1,35476
CHK I,0,31
STO I
RET P
L1 DEF 76
LOC 0
SIMPL111 ENT P,2,L1 SIMPLIFY 1 1 1
LDA 1,35760
LOD I,2,8
CHK J,-1,30
INC I,1
IXA 116
STR A,2,72
LOD A,2,72
IND I,60
LDC I,0
LOC 10
EQU I
FJP L2
MST 2,4,4
LDC I,21
CHK I,0,68
PAR I
CUP P,2,ERROR005
L2 LAB
LOD A,2,72
IND I,56
LDC I,0
LOC 20
EQU I
LOD A,2,72
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
NOT
AND
FJP L3
LOC 30
LOD A,2,72
IND I,68
LDC I,0
EQU I
NOT
FJP L4
MST 2,4,4
LCA 'SIMPLIFY 001'
PAR A
CUP P,2,ASSER003
L4 LAB
LOC 40
LOD A,2,72
IND I,72
XJP L5
L9 LAB
LDC B,0
NOT
FJP L10
MST 2,4,4
LCA 'SIMPLIFY 002'
PAR A
CUP P,2,ASSER003
L10 LAB
LOC 50
UJP L8
L11 LAB
MST 2,8,8
LDA 2,12
PAR A
LOD A,2,72
INC A,76
PAR A
CUP P,4,VPA$O135
LOD A,2,72
IND I,76
LOC 60
LDC I,0
GRT I
FJP L12
MST 3,4,4
LDA 2,12
PAR A
CUP P,2,SHIFT152
UJP L13
L12 LAB
LOD A,2,72
IND I,64
LOC 70
LDC I,0
NEQ I
FJP L14
MST 3,4,4
LDA 2,12
PAR A
CUP P,2,FPA$D147
UJP L15
L14 LAB
MST 2,4,4
LOD A,2,72
LOC 80
INC A,76
PAR A
CUP B,2,IS$SI125
NOT
NOT
FJP L16
MST 2,4,4
LCA 'SIMPLIFY 003'
PAR A
CUP P,2,ASSER003
L16 LAB
LOC 90
MST 3,12,12
LOD A,2,72
INC A,76
PAR A
LDA 2,12
PAR A
LOD A,2,72
IND I,4
CHK I,0,15
PAR I
LOC 100
CUP P,6,DEREF154
L15 LAB
L13 LAB
UJP L8
L17 LAB
LOD A,2,72
IND I,76
LDC I,0
GRT I
FJP L18
MST 3,4,4
LOD A,2,72
INC A,76
LOC 110
PAR A
CUP P,2,DEREF151
UJP L19
L18 LAB
LOD A,2,72
IND I,96
LDC I,0
GRT I
FJP L20
MST 3,4,4
LOD A,2,72
LOC 120
INC A,96
PAR A
CUP P,2,DEREF151
UJP L21
L20 LAB
MST 3,0,0
CUP P,0,ADD$V145
L21 LAB
L19 LAB
UJP L8
L5 DEF 0
L6 DEF 2
L7 LAB
UJP L9
UJP L11
UJP L17
L8 LAB
LOC 130
UJP L23
L3 LAB
LOD A,2,72
IND I,72
XJP L24
L28 LAB
LOD A,2,72
IND I,4
LDC I,3
EQU I
LOD A,2,72
IND I,68
LOC 140
LDC I,0
GRT I
LOD A,2,72
IND I,64
LDC I,0
NEQ I
AND
IOR
NOT
FJP L29
LOC 150
MST 2,4,4
LCA 'SIMPLIFY 004'
PAR A
CUP P,2,ASSER003
L29 LAB
MST 3,0,0
CUP P,0,CALCU150
UJP L27
L30 LAB
LOD A,2,72
IND I,4
LDC I,3
LOC 160
NEQ I
LOD A,2,72
INC A,60
LDA 1,4692
EQU M,12
AND
MST 2,4,4
LOD A,2,72
INC A,76
PAR A
LOC 170
CUP B,2,IS$SI125
AND
NOT
NOT
FJP L31
MST 2,4,4
LCA 'SIMPLIFY 005'
PAR A
CUP P,2,ASSER003
L31 LAB
MST 2,4,4
LOC 180
LOD A,2,72
INC A,76
PAR A
CUP B,2,FITS$126
FJP L32
MST 3,0,0
CUP P,0,VPA$F148
UJP L33
L32 LAB
MST 2,8,8
LDA 2,12
LOC 190
PAR A
LOD A,2,72
INC A,76
PAR A
CUP P,4,VPA$O135
LOD A,2,72
IND I,76
LDC I,0
GRT I
FJP L34
LOC 200
LOD A,2,72
INC A,60
LDA 1,4692
EQU M,12
LOD A,2,72
IND I,4
LDC I,3
NEQ I
AND
FJP L35
LOC 210
MST 2,4,4
LDC I,20
CHK I,0,68
PAR I
CUP P,2,ERROR005
L35 LAB
MST 3,4,4
LDA 2,12
PAR A
CUP P,2,SHIFT152
UJP L36
L34 LAB
LOC 220
LOD A,2,72
IND I,68
LDC I,0
GRT I
LOD A,2,72
IND I,64
LDC I,0
NEQ I
AND
FJP L37
LOC 230
MST 3,4,4
LDA 2,12
PAR A
CUP P,2,FPA$L146
UJP L38
L37 LAB
LOD A,2,72
IND I,4
LDC I,3
EQU I
LOD A,2,72
LOC 240
INC A,60
LDA 1,4692
NEQ M,12
IOR
FJP L39
MST 3,8,8
LOD A,2,72
INC A,76
PAR A
LDA 2,12
LOC 250
PAR A
CUP P,4,DEREF153
UJP L40
L39 LAB
LOD I,2,12
LDC I,1
EQU I
NOT
FJP L41
MST 2,4,4
LCA 'SIMPLIFY 006'
LOC 260
PAR A
CUP P,2,ASSER003
L41 LAB
LOD A,2,72
IND I,56
LDC I,0
GRT I
LOD I,2,28
LDC I,0
EQU I
AND
LOC 270
FJP L42
LDC I,1
CHK I,0,1
STR I,2,28
LOD A,2,72
INC A,56
LOD A,2,72
IND I,56
DEC I,1
CHK I,0,2
LOC 280
STO I
L42 LAB
LOD A,2,72
IND I,56
LDC I,0
EQU I
FJP L43
MST 3,12,12
LOD A,2,72
INC A,76
PAR A
LOC 290
LDA 2,12
PAR A
LOD A,2,72
IND I,4
CHK I,0,15
PAR I
CUP P,6,DEREF154
UJP L44
L43 LAB
MST 3,8,8
LOD A,2,72
LOC 300
INC A,76
PAR A
LDA 2,12
PAR A
CUP P,4,DEREF153
LOD A,2,72
INC A,80
LDC I,2
CHK I,1,2
STO I
LOC 310
LOD A,2,72
INC A,56
LOD A,2,72
IND I,56
DEC I,1
CHK I,0,2
STO I
L44 LAB
L40 LAB
L38 LAB
L36 LAB
L33 LAB
UJP L27
L45 LAB
MST 2,4,4
LOD A,2,72
LOC 320
INC A,76
PAR A
CUP B,2,IS$SI125
MST 2,4,4
LOD A,2,72
INC A,96
PAR A
CUP B,2,FITS$126
AND
FJP L46
LOC 330
MST 3,8,8
LOD A,2,72
INC A,96
PAR A
LOD A,2,72
INC A,76
PAR A
CUP P,4,SHORT149
UJP L47
L46 LAB
MST 2,4,4
LOC 340
LOD A,2,72
INC A,96
PAR A
CUP B,2,IS$SI125
MST 2,4,4
LOD A,2,72
INC A,76
PAR A
CUP B,2,FITS$126
AND
LOC 350
FJP L48
MST 3,8,8
LOD A,2,72
INC A,76
PAR A
LOD A,2,72
INC A,96
PAR A
CUP P,4,SHORT149
UJP L49
L48 LAB
LOC 360
LOD A,2,72
IND I,4
LDC I,3
NEQ I
LOD A,2,72
INC A,60
LDA 1,4692
EQU M,12
AND
FJP L50
LOC 370
LOD A,2,72
IND I,76
LDC I,0
GRT I
FJP L51
MST 3,4,4
LOD A,2,72
INC A,76
PAR A
CUP P,2,DEREF151
LOC 380
UJP L52
L51 LAB
MST 2,4,4
LOD A,2,72
INC A,76
PAR A
CUP B,2,IS$SI125
NOT
FJP L53
MST 2,8,8
LDA 2,12
LOC 390
PAR A
LOD A,2,72
INC A,76
PAR A
CUP P,4,VPA$O135
MST 3,8,8
LOD A,2,72
INC A,76
PAR A
LDA 2,12
LOC 400
PAR A
CUP P,4,DEREF153
UJP L54
L53 LAB
LOD A,2,72
IND I,96
LDC I,0
GRT I
FJP L55
MST 3,4,4
LOD A,2,72
LOC 410
INC A,96
PAR A
CUP P,2,DEREF151
UJP L56
L55 LAB
MST 2,8,8
LDA 2,12
PAR A
LOD A,2,72
INC A,96
PAR A
LOC 420
CUP P,4,VPA$O135
MST 3,8,8
LOD A,2,72
INC A,96
PAR A
LDA 2,12
PAR A
CUP P,4,DEREF153
L56 LAB
L54 LAB
L52 LAB
UJP L57
L50 LAB
LOD A,2,72
LOC 430
IND I,76
LDC I,0
GRT I
FJP L58
MST 3,4,4
LOD A,2,72
INC A,76
PAR A
CUP P,2,DEREF151
UJP L59
L58 LAB
LOC 440
LOD A,2,72
IND I,96
LDC I,0
GRT I
FJP L60
MST 3,4,4
LOD A,2,72
INC A,96
PAR A
CUP P,2,DEREF151
LOC 450
UJP L61
L60 LAB
MST 3,0,0
CUP P,0,ADD$V145
L61 LAB
L59 LAB
L57 LAB
L49 LAB
L47 LAB
UJP L27
L24 DEF 0
L25 DEF 2
L26 LAB
UJP L28
UJP L30
UJP L45
L27 LAB
L23 LAB
LOD B,1,283
FJP L63
LDA 1,13
LOC 460
CSP SIO
LCA ' INSTRUCTION(S) EMITTED:'
LDC I,29
LDC I,29
CSP WRS
CSP WLN
CSP EIO
LOD A,1,288
LDC N
EQU A
LOC 470
FJP L64
LOD A,1,324
CHK A,-1,0
STR A,1,288
L64 LAB
L65 LAB
LOD A,1,288
LDC N
NEQ A
FJP L66
LDC I,0
STR I,2,68
LOC 480
MST 2,8,8
LDA 2,68
PAR A
LOD A,1,288
CHK A,-1,0
PAR A
CUP P,4,DISAS007
MST 2,4,4
LOD A,1,288
CHK A,-1,0
LOC 490
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,1,288
UJP L65
L66 LAB
LOD A,1,328
CHK A,-1,0
STR A,1,288
LDA 1,13
CSP SIO
LOC 500
LCA ' DATUM SIMPLIFIED'
LDC I,22
LDC I,22
CSP WRS
CSP WLN
CSP EIO
MST 2,4,4
LOD I,2,8
CHK I,-1,30
PAR I
LOC 510
CUP P,2,PRINT012
L63 LAB
RET P
L1 DEF 76
SST P DISAS007 2 8 0 56 8
SST P PRINT155 3 0 0 12 0
LOC 0
PRINT155 ENT P,3,L1 PRINTLOC 1 1 1
MST 2,8,8
LDA 3,8
PAR A
LOD A,2,8
IND I,0
CHK I,0,34359738367
PAR I
CUP P,4,CVOS$034
LDA 1,13
LOC 10
CSP SIO
LDA 3,8
LDC I,10
LDC I,10
CSP WRS
LCA ' : '
LDC I,4
LDC I,4
CSP WRS
CSP EIO
LOC 20
RET P
L1 DEF 20
SST P PRINT156 3 0 0 12 0
LOC 0
PRINT156 ENT P,3,L1 PRINTIWORD 1 1 1
MST 2,8,8
LDA 3,8
PAR A
LDA 2,24
PAR A
CUP P,4,CVOS$032
LDA 1,13
CSP SIO
LDA 3,8
LOC 10
LDC I,12
LDC I,12
CSP WRS
LCA ' '
LDC I,2
LDC I,2
CSP WRS
CSP EIO
RET P
L1 DEF 20
SST P PRINT157 3 0 0 12 0
LOC 0
PRINT157 ENT P,3,L1 PRINTXWRD1 1 1 1
LOD A,2,40
LDC N
EQU A
FJP L2
UJP L3
L2 LAB
MST 2,8,8
LDA 3,8
PAR A
LOD A,2,40
LOC 10
CHK A,0,0
INC A,4
PAR A
CUP P,4,CVOS$032
LDA 1,13
CSP SIO
LCA ' '
LDC I,14
LDC I,14
CSP WRS
LOC 20
LDA 3,8
LDC I,12
LDC I,12
CSP WRS
CSP WLN
CSP EIO
L3 LAB
RET P
L1 DEF 20
SST P PRINT158 3 0 0 12 0
LOC 0
PRINT158 ENT P,3,L1 PRINTXWRD2 1 1 1
LOD A,2,36
LDC N
EQU A
FJP L2
UJP L3
L2 LAB
MST 2,8,8
LDA 3,8
PAR A
LOD A,2,36
LOC 10
CHK A,0,0
INC A,4
PAR A
CUP P,4,CVOS$032
LDA 1,13
CSP SIO
LCA ' '
LDC I,14
LDC I,14
CSP WRS
LOC 20
LDA 3,8
LDC I,12
LDC I,12
CSP WRS
CSP WLN
CSP EIO
L3 LAB
RET P
L1 DEF 20
SST P PRINT159 3 0 0 0 0
LOC 0
PRINT159 ENT P,3,L1 PRINTOPCODE 1 1 1
LDA 1,13
CSP SIO
LDA 1,24872
LOD I,2,20
CHK J,0,285
IXA 15
LDC I,15
LDC I,15
CSP WRS
LOC 10
LDC C,' '
LDC I,1
CSP WRC
CSP EIO
RET P
L1 DEF 8
SST P PRINT160 3 16 8 52 16
SST P PRINT161 4 4 0 4 4
LOC 0
PRINT161 ENT P,4,L1 PRINTREG 1 1 1
LDC I,3
STR I,4,12
LOD I,4,8
LDC I,4
EQU I
FJP L2
LDA 1,13
CSP SIO
LCA '%RTA'
LOC 10
LDC I,4
LDC I,4
CSP WRS
CSP EIO
UJP L3
L2 LAB
LOD I,4,8
LDC I,6
EQU I
FJP L4
LDA 1,13
LOC 20
CSP SIO
LCA '%RTB'
LDC I,4
LDC I,4
CSP WRS
CSP EIO
UJP L5
L4 LAB
MST 2,4,4
LOD I,4,8
PAR I
LOC 30
CUP I,2,FLDW0001
STR I,4,12
LDA 1,13
CSP SIO
LDC C,'%'
LDC I,1
CSP WRC
LOD I,4,8
LOD I,4,12
CSP WRI
LOC 40
LDC C,'.'
LDC I,1
CSP WRC
CSP EIO
L5 LAB
L3 LAB
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
LOD I,4,12
LOC 50
ADI
LDC I,1
ADI
STO I
RET P
L1 DEF 16
SST P PRINT162 4 0 0 0 0
LOC 0
PRINT162 ENT P,4,L1 PRINTSHORTOP 1 1 1
LOD I,3,56
LDC I,0
EQU I
FJP L2
MST 4,4,4
LOD I,3,60
CHK I,0,31
PAR I
CUP P,2,PRINT161
LOC 10
UJP L3
L2 LAB
LOD I,3,56
LDC I,1
EQU I
FJP L4
MST 2,4,4
LOD I,3,60
PAR I
CUP I,2,FLDW0001
STR I,3,32
LOC 20
LDA 1,13
CSP SIO
LDC C,'#'
LDC I,1
CSP WRC
LOD I,3,60
LOD I,3,32
CSP WRI
LDC C,'.'
LDC I,1
LOC 30
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
LOD I,3,32
ADI
LDC I,1
LOC 40
ADI
STO I
UJP L5
L4 LAB
LOD I,3,56
LDC I,2
EQU I
FJP L6
LDC B,0
NOT
FJP L7
LOC 50
MST 2,4,4
LCA 'PRINTSHOR001'
PAR A
CUP P,2,ASSER003
UJP L8
L7 LAB
LDC I,3
LOD I,3,56
LEQ I
LOD I,3,56
LDC I,31
LOC 60
LEQ I
AND
NOT
FJP L9
MST 2,4,4
LCA 'PRINTSHOR002'
PAR A
CUP P,2,ASSER003
L9 LAB
LOD I,3,60
STR I,3,40
LOC 70
MST 2,4,4
LOD I,3,40
PAR I
CUP I,2,FLDW0001
STR I,3,32
LDA 1,13
CSP SIO
LOD I,3,40
LOD I,3,32
CSP WRI
LOC 80
LCA '.('
LDC I,2
LDC I,2
CSP WRS
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LOD I,3,32
ADI
LOC 90
LDC I,2
ADI
STO I
MST 4,4,4
LOD I,3,56
CHK I,0,31
PAR I
CUP P,2,PRINT161
LDA 1,13
CSP SIO
LOC 100
LDC C,')'
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
STO I
L8 LAB
L6 LAB
L5 LAB
L3 LAB
LOC 110
RET P
L1 DEF 8
LOC 0
PRINT160 ENT P,3,L1 PRINTOPERAND 1 1 1
LDA 3,24
LOD A,3,12
MOV 8
MST 2,12,12
LDA 3,24
PAR A
LOD I,3,20
LDC I,0
ADI
LOC 10
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,1
STR I,3,52
MST 2,12,12
LDA 3,24
LOC 20
PAR A
LOD I,3,20
LDC I,1
ADI
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 30
CHK I,0,31
STR I,3,56
MST 2,12,12
LDA 3,24
PAR A
LOD I,3,20
LDC I,6
ADI
CHK I,0,35
PAR I
LOC 40
LDC I,6
CHK I,1,36
PAR I
CUP I,6,GETSI021
CHK I,-32,31
STR I,3,60
LOD A,3,8
LDC I,0
STO I
LOD I,3,52
LOC 50
LDC I,1
EQU I
FJP L2
LOD A,3,16
LDC N
NEQ A
NOT
FJP L3
MST 2,4,4
LCA 'PRINTOPER001'
LOC 60
PAR A
CUP P,2,ASSER003
L3 LAB
LDA 3,64
LOD A,3,16
CHK A,0,0
INC A,4
MOV 8
LOD I,3,56
LDC I,1
EQU I
LOC 70
LOD I,3,60
LDC I,0
NEQ I
AND
FJP L4
LOD I,3,60
LDC I,1
GEQ I
LOD I,3,60
LDC I,3
LOC 80
LEQ I
AND
NOT
FJP L5
MST 2,4,4
LCA 'PRINTOPER002'
PAR A
CUP P,2,ASSER003
L5 LAB
MST 2,12,12
LDA 3,64
LOC 90
PAR A
LDC I,0
CHK I,0,35
PAR I
LDC I,6
CHK I,1,36
PAR I
CUP I,6,GETSI021
STR I,3,36
LDA 1,13
LOC 100
CSP SIO
LDC C,'#'
LDC I,1
CSP WRC
LDC I,124
CHR
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOC 110
LOD A,3,8
IND I,0
LDC I,2
ADI
STO I
LOD I,3,36
LDC I,0
EQU I
LOD I,3,36
LDC I,1
LOC 120
NGI
EQU I
IOR
LOD I,3,60
LDC I,1
EQU I
AND
FJP L6
MST 2,12,12
LDA 3,64
LOC 130
PAR A
LDC I,36
LDC I,36
LDC I,1
SBI
SBI
CHK I,0,35
PAR I
LDC I,36
LDC I,1
LOC 140
SBI
CHK I,1,36
PAR I
CUP I,6,GETSI021
STR I,3,40
LOD I,3,36
LDC I,0
EQU I
LOD I,3,40
LDC I,0
LOC 150
GEQ I
AND
LOD I,3,36
LDC I,1
NGI
EQU I
LOD I,3,40
LDC I,0
LES I
AND
LOC 160
IOR
NOT
FJP L7
MST 2,4,4
LCA 'PRINTOPER003'
PAR A
CUP P,2,ASSER003
L7 LAB
MST 2,4,4
LOD I,3,40
PAR I
LOC 170
CUP I,2,FLDW0001
STR I,3,32
LDA 1,13
CSP SIO
LOD I,3,40
LOD I,3,32
CSP WRI
LDC C,'.'
LDC I,1
CSP WRC
LOC 180
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LOD I,3,32
ADI
LDC I,1
ADI
STO I
UJP L8
L6 LAB
LOC 190
MST 2,8,8
LDA 3,72
PAR A
LDA 3,64
PAR A
CUP P,4,CVOS$032
LDC I,1
STR I,3,44
L9 LAB
LDA 3,72
LOD I,3,44
LOC 200
CHK J,1,12
DEC I,1
IXA 1
IND C,0
LDC C,' '
EQU C
FJP L10
LOD I,3,44
LDC I,1
ADI
LOC 210
STR I,3,44
UJP L9
L10 LAB
LOD I,3,44
STR I,3,48
LDC I,12
STR I,3,84
LOD I,3,48
LOD I,3,84
LEQ I
FJP L12
L11 LAB
LOC 220
LDA 1,13
CSP SIO
LDA 3,72
LOD I,3,48
CHK J,1,12
DEC I,1
IXA 1
IND C,0
LDC I,1
CSP WRC
LOC 230
CSP EIO
LOD I,3,48
LOD I,3,84
NEQ I
FJP L12
LOD I,3,48
INC I,1
STR I,3,48
UJP L11
L12 LAB
LOD A,3,8
LOC 240
LOD A,3,8
IND I,0
LDC I,12
LDC I,1
ADI
ADI
LOD I,3,44
SBI
STO I
LOD I,3,60
LOC 250
LDC I,1
NEQ I
FJP L13
LDA 1,13
CSP SIO
LDC C,'F'
LDC I,1
CSP WRC
LOD I,3,60
LDC I,1
LOC 260
CSP WRI
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,2
ADI
STO I
L13 LAB
L8 LAB
LDA 1,13
CSP SIO
LOC 270
LDC I,124
CHR
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
LOC 280
STO I
UJP L14
L4 LAB
LDA 1,13
CSP SIO
LDC I,124
CHR
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOC 290
LOD A,3,8
IND I,0
LDC I,1
ADI
STO I
MST 2,12,12
LDA 3,64
PAR A
LDC I,3
CHK I,0,35
LOC 300
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L15
LDA 1,13
CSP SIO
LOC 310
LDC C,'@'
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
STO I
L15 LAB
LOC 320
MST 2,12,12
LDA 3,64
PAR A
LDC I,1
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 330
LDC I,1
EQU I
FJP L16
MST 2,12,12
LDA 3,64
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,25
LOC 340
CHK I,1,36
PAR I
CUP I,6,GETSI021
STR I,3,40
MST 2,4,4
LOD I,3,40
PAR I
CUP I,2,FLDW0001
STR I,3,32
LDA 1,13
LOC 350
CSP SIO
LOD I,3,40
LOD I,3,32
CSP WRI
LCA '.('
LDC I,2
LDC I,2
CSP WRS
CSP EIO
LOD A,3,8
LOC 360
LOD A,3,8
IND I,0
LOD I,3,32
ADI
LDC I,2
ADI
STO I
MST 4,4,4
MST 2,12,12
LDA 3,64
LOC 370
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,31
PAR I
LOC 380
CUP P,2,PRINT161
LDA 1,13
CSP SIO
LDC C,')'
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LOC 390
LDC I,1
ADI
STO I
UJP L17
L16 LAB
MST 2,12,12
LDA 3,64
PAR A
LDC I,6
CHK I,0,35
PAR I
LOC 400
LDC I,30
CHK I,1,36
PAR I
CUP I,6,GETFI020
STR I,3,40
MST 2,4,4
LOD I,3,40
PAR I
CUP I,2,FLDW0001
STR I,3,32
LOC 410
LDA 1,13
CSP SIO
LOD I,3,40
LOD I,3,32
CSP WRI
LDC C,'.'
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOC 420
LOD A,3,8
IND I,0
LOD I,3,32
ADI
LDC I,1
ADI
STO I
L17 LAB
LDA 1,13
CSP SIO
LDC I,124
LOC 430
CHR
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
STO I
LOC 440
LOD I,3,56
LDC I,1
EQU I
LOD I,3,60
LDC I,0
EQU I
AND
FJP L18
UJP L19
L18 LAB
LDA 1,13
LOC 450
CSP SIO
LDC C,'('
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
LOC 460
STO I
MST 4,0,0
CUP P,0,PRINT162
LDA 1,13
CSP SIO
LDC C,')'
LDC I,1
CSP WRC
CSP EIO
LOD A,3,8
LOC 470
LOD A,3,8
IND I,0
LDC I,1
ADI
STO I
MST 2,12,12
LDA 3,64
PAR A
LDC I,4
CHK I,0,35
LOC 480
PAR I
LDC I,2
CHK I,1,36
PAR I
CUP I,6,GETFI020
STR I,3,40
LOD I,3,40
LDC I,0
NEQ I
FJP L20
LOC 490
MST 2,4,4
LOD I,3,40
PAR I
CUP I,2,FLDW0001
STR I,3,32
LDA 1,13
CSP SIO
LDC C,'↑'
LDC I,1
CSP WRC
LOC 500
LOD I,3,40
LOD I,3,32
CSP WRI
CSP EIO
LOD A,3,8
LOD A,3,8
IND I,0
LDC I,1
ADI
LOD I,3,32
LOC 510
ADI
STO I
L20 LAB
L19 LAB
L14 LAB
UJP L21
L2 LAB
LOD A,3,16
LDC N
EQU A
NOT
FJP L22
MST 2,4,4
LCA 'PRINTOPER004'
LOC 520
PAR A
CUP P,2,ASSER003
L22 LAB
MST 4,0,0
CUP P,0,PRINT162
L21 LAB
RET P
L1 DEF 88
LOC 0
DISAS007 ENT P,2,L1 DISASSEMBLE 1 1 1
MST 2,4,4
LOD A,2,12
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK I,0,285
STR I,2,20
LDC N
CHK A,-1,0
LOC 10
STR A,2,40
LDC N
CHK A,-1,0
STR A,2,36
LDA 2,24
LOD A,2,12
CHK A,0,0
INC A,4
MOV 8
LOD A,2,8
LOC 20
IND I,0
STR I,2,16
LDA 1,23728
LOD I,2,20
CHK J,0,285
IXA 4
IND I,0
ORD
CHK I,0,4
XJP L2
L6 LAB
LOC 30
UJP L5
L7 LAB
MST 3,0,0
CUP P,0,PRINT155
MST 3,0,0
CUP P,0,PRINT156
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,32
LOC 40
LOD I,2,16
LDC I,4
ADI
STR I,2,16
MST 2,12,12
LDA 2,24
PAR A
LDC I,24
CHK I,0,35
PAR I
LOC 50
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L8
LOD I,2,16
LDC I,4
ADI
LOC 60
STR I,2,16
LOD A,2,32
CHK A,-1,0
STR A,2,36
LOD A,2,32
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,32
L8 LAB
MST 2,12,12
LOC 70
LDA 2,24
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
LOC 80
EQU I
FJP L9
LOD I,2,16
LDC I,4
ADI
STR I,2,16
LOD A,2,32
CHK A,-1,0
STR A,2,40
LOD A,2,32
LOC 90
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,32
L9 LAB
MST 3,0,0
CUP P,0,PRINT159
LDA 1,23728
LOD I,2,20
CHK J,0,285
IXA 4
LOC 100
IND I,0
LDC I,1
EQU I
FJP L10
MST 2,12,12
LDA 2,24
PAR A
LDC I,10
CHK I,0,35
PAR I
LOC 110
LDC I,2
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,3
STR I,2,44
LOD I,2,44
LDC I,1
EQU I
FJP L11
LOC 120
MST 3,16,16
LDA 2,48
PAR A
LDA 2,24
PAR A
LOD A,2,40
CHK A,-1,0
PAR A
LDC I,12
CHK I,0,35
LOC 130
PAR I
CUP P,8,PRINT160
LDA 1,13
CSP SIO
LCA ' , %RTA, '
LDC I,9
LDC I,9
CSP WRS
CSP EIO
MST 3,16,16
LOC 140
LDA 2,48
PAR A
LDA 2,24
PAR A
LOD A,2,36
CHK A,-1,0
PAR A
LDC I,24
CHK I,0,35
PAR I
LOC 150
CUP P,8,PRINT160
UJP L12
L11 LAB
LOD I,2,44
LDC I,2
EQU I
FJP L13
LDA 1,13
CSP SIO
LCA '%RTA , '
LDC I,7
LOC 160
LDC I,7
CSP WRS
CSP EIO
UJP L14
L13 LAB
LOD I,2,44
LDC I,3
EQU I
FJP L15
LDA 1,13
CSP SIO
LOC 170
LCA '%RTB , '
LDC I,7
LDC I,7
CSP WRS
CSP EIO
L15 LAB
L14 LAB
MST 3,16,16
LDA 2,48
PAR A
LDA 2,24
PAR A
LOC 180
LOD A,2,40
CHK A,-1,0
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP P,8,PRINT160
LDA 1,13
CSP SIO
LCA ', '
LOC 190
LDC I,2
LDC I,2
CSP WRS
CSP EIO
MST 3,16,16
LDA 2,48
PAR A
LDA 2,24
PAR A
LOD A,2,36
LOC 200
CHK A,-1,0
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP P,8,PRINT160
L12 LAB
UJP L16
L10 LAB
MST 3,16,16
LDA 2,48
PAR A
LOC 210
LDA 2,24
PAR A
LOD A,2,40
CHK A,-1,0
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP P,8,PRINT160
LDA 1,13
LOC 220
CSP SIO
LCA ', '
LDC I,2
LDC I,2
CSP WRS
CSP EIO
MST 3,16,16
LDA 2,48
PAR A
LDA 2,24
LOC 230
PAR A
LOD A,2,36
CHK A,-1,0
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP P,8,PRINT160
LDA 1,23728
LOD I,2,20
LOC 240
CHK J,0,285
IXA 4
IND I,0
LDC I,4
EQU I
FJP L17
MST 2,8,8
LDA 2,52
PAR A
LOD A,2,8
LOC 250
IND I,0
LDC I,4
MST 2,12,12
LDA 2,24
PAR A
LDC I,8
CHK I,0,35
PAR I
LDC I,4
CHK I,1,36
LOC 260
PAR I
CUP I,6,GETSI021
MPI
ADI
CHK I,0,34359738367
PAR I
CUP P,4,CVOS$034
LDA 1,13
CSP SIO
LCA ' , '
LOC 270
LDC I,3
LDC I,3
CSP WRS
CSP EIO
LDC I,1
STR I,2,64
L18 LAB
LDA 2,52
LOD I,2,64
CHK J,1,10
DEC I,1
LOC 280
IXA 1
IND C,0
LDC C,' '
EQU C
FJP L19
LOD I,2,64
LDC I,1
ADI
STR I,2,64
UJP L18
L19 LAB
LOC 290
LOD I,2,64
STR I,2,68
LDC I,10
STR I,2,72
LOD I,2,68
LOD I,2,72
LEQ I
FJP L21
L20 LAB
LDA 1,13
CSP SIO
LOC 300
LDA 2,52
LOD I,2,68
CHK J,1,10
DEC I,1
IXA 1
IND C,0
LDC I,1
CSP WRC
CSP EIO
LOD I,2,68
LOC 310
LOD I,2,72
NEQ I
FJP L21
LOD I,2,68
INC I,1
STR I,2,68
UJP L20
L21 LAB
L17 LAB
L16 LAB
LDA 1,13
CSP SIO
CSP WLN
LOC 320
CSP EIO
MST 3,0,0
CUP P,0,PRINT158
MST 3,0,0
CUP P,0,PRINT157
UJP L5
L22 LAB
MST 3,0,0
CUP P,0,PRINT155
MST 3,0,0
CUP P,0,PRINT156
LOC 330
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,32
LOD I,2,16
LDC I,4
ADI
STR I,2,16
LOD B,1,35756
LOC 340
MST 2,12,12
LDA 2,24
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 350
LDC I,0
EQU I
AND
LOD B,1,35756
NOT
IOR
MST 2,12,12
LDA 2,24
PAR A
LDC I,24
LOC 360
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
AND
FJP L23
LOC 370
LOD I,2,16
LDC I,4
ADI
STR I,2,16
LOD A,2,32
CHK A,-1,0
STR A,2,36
LOD A,2,32
CHK A,0,0
IND A,0
LOC 380
CHK A,-1,0
STR A,2,32
L23 LAB
MST 2,12,12
LDA 2,24
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
LOC 390
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L24
LOD I,2,16
LDC I,4
ADI
STR I,2,16
LOD A,2,32
LOC 400
CHK A,-1,0
STR A,2,40
LOD A,2,32
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,32
L24 LAB
MST 3,0,0
CUP P,0,PRINT159
MST 3,16,16
LOC 410
LDA 2,48
PAR A
LDA 2,24
PAR A
LOD A,2,40
CHK A,-1,0
PAR A
LDC I,12
CHK I,0,35
PAR I
LOC 420
CUP P,8,PRINT160
LDA 1,13
CSP SIO
LCA ' ,'
LDC I,2
LDC I,2
CSP WRS
CSP EIO
LOD B,1,35756
MST 2,12,12
LOC 430
LDA 2,24
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
LOC 440
EQU I
AND
FJP L25
MST 2,8,8
LDA 2,52
PAR A
LOD A,2,8
IND I,0
LDC I,4
MST 2,12,12
LOC 450
LDA 2,24
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
CUP I,6,GETSI021
MPI
LOC 460
ADI
CHK I,0,34359738367
PAR I
CUP P,4,CVOS$034
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
CSP EIO
LOC 470
LDC I,1
STR I,2,64
L26 LAB
LDA 2,52
LOD I,2,64
CHK J,1,10
DEC I,1
IXA 1
IND C,0
LDC C,' '
EQU C
LOC 480
FJP L27
LOD I,2,64
LDC I,1
ADI
STR I,2,64
UJP L26
L27 LAB
LOD I,2,64
STR I,2,68
LDC I,10
STR I,2,72
LOC 490
LOD I,2,68
LOD I,2,72
LEQ I
FJP L29
L28 LAB
LDA 1,13
CSP SIO
LDA 2,52
LOD I,2,68
CHK J,1,10
DEC I,1
LOC 500
IXA 1
IND C,0
LDC I,1
CSP WRC
CSP EIO
LOD I,2,68
LOD I,2,72
NEQ I
FJP L29
LOD I,2,68
LOC 510
INC I,1
STR I,2,68
UJP L28
L29 LAB
UJP L30
L25 LAB
LDA 1,13
CSP SIO
LCA ' '
LDC I,2
LDC I,2
CSP WRS
LOC 520
CSP EIO
MST 3,16,16
LDA 2,48
PAR A
LDA 2,24
PAR A
LOD A,2,36
CHK A,-1,0
PAR A
LDC I,24
LOC 530
CHK I,0,35
PAR I
CUP P,8,PRINT160
L30 LAB
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
MST 3,0,0
CUP P,0,PRINT158
MST 3,0,0
LOC 540
CUP P,0,PRINT157
UJP L5
L2 DEF 0
L3 DEF 4
L4 LAB
UJP L6
UJP L7
UJP L22
UJP L7
UJP L7
L5 LAB
LOD A,2,8
LOD I,2,16
STO I
LOC 550
RET P
L1 DEF 76
SST P CODE$163 2 0 0 48 0
SST I INSTR164 3 8 0 28 8
LOC 0
INSTR164 ENT I,3,L1 INSTR_WORDS 1 1 1
LDA 3,16
LOD A,3,8
CHK A,0,0
INC A,4
MOV 8
MST 2,4,4
LOD A,3,8
CHK A,-1,0
PAR A
LOC 10
CUP I,2,GETS1008
CHK I,0,285
STR I,3,32
LDA 1,23728
LOD I,3,32
CHK J,0,285
IXA 4
IND I,0
LDC I,0
EQU I
LOC 20
FJP L2
LDC I,0
STR I,3,28
UJP L3
L2 LAB
LDC I,1
STR I,3,28
MST 2,12,12
LDA 3,16
PAR A
LDC I,24
LOC 30
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L4
LOD I,3,28
LOC 40
LDC I,1
ADI
STR I,3,28
L4 LAB
MST 2,12,12
LDA 3,16
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
LOC 50
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L5
LOD I,3,28
LDC I,1
ADI
STR I,3,28
L5 LAB
LOC 60
LDA 1,23728
LOD I,3,32
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
FJP L6
MST 2,4,4
LOD A,3,8
LOC 70
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,3,40
MST 2,12,12
LDA 3,16
PAR A
LDC I,11
CHK I,0,35
LOC 80
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L7
LDC I,2
STR I,3,28
LOC 90
UJP L8
L7 LAB
LOD A,3,40
LDC N
NEQ A
FJP L9
MST 2,4,4
LOD A,3,40
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LOC 100
LDC I,2
EQU I
NOT
FJP L10
MST 2,4,4
LCA 'CODE_CONC001'
PAR A
CUP P,2,ASSER003
L10 LAB
MST 2,12,12
LOD A,3,40
LOC 110
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,24
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 120
CHK I,0,16777215
STR I,3,36
LOD I,3,36
LDC I,16777215
NEQ I
LOD I,3,36
LOD I,3,12
LES I
AND
FJP L11
LOC 130
MST 2,12,12
LDA 3,16
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 140
LDC I,0
EQU I
FJP L12
LOD I,3,36
LOD I,3,12
SBI
LDC I,4
DVI
STR I,3,24
LOD I,3,24
LOC 150
LDC I,-2048
LES I
FJP L13
LOD I,3,28
LDC I,1
ADI
STR I,3,28
L13 LAB
L12 LAB
UJP L14
L11 LAB
MST 2,12,12
LDA 3,16
LOC 160
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
LOC 170
LOD B,2,53
AND
FJP L15
LOD I,3,28
LDC I,1
ADI
STR I,3,28
L15 LAB
L14 LAB
L9 LAB
L8 LAB
L6 LAB
L3 LAB
LOD I,3,28
STR I,3,0
RET I
L1 DEF 44
SST P CONC$165 3 0 0 0 0
SST P INSER166 4 4 0 4 4
LOC 0
INSER166 ENT P,4,L1 INSERT_S1LOC 1 1 1
LOD A,4,8
LDC N
NEQ A
FJP L2
MST 2,4,4
LDA 4,12
PAR A
CUP P,2,NEWCO019
LOD A,4,12
LOC 10
CHK A,0,0
LOD A,4,8
CHK A,0,0
MOV 12
LOD A,4,8
CHK A,0,0
LOD A,4,12
CHK A,-1,0
STO A
LOD A,4,8
LOC 20
CHK A,0,0
INC A,4
LDA 1,4568
MOV 8
MST 2,16,16
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,0
LOC 30
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LDC I,2
CHK J,0,285
IXA 4
IND I,0
LOC 40
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LOC 50
LDC I,24
CHK I,1,36
PAR I
LDC I,16777215
PAR I
CUP P,8,PUTFI022
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
LOC 60
STR I,1,316
L2 LAB
RET P
L1 DEF 16
SST P JMPX$167 4 4 0 16 4
LOC 0
JMPX$167 ENT P,4,L1 JMPX_TO_JMPA 1 1 1
MST 2,12,12
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
LOC 10
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
FJP L2
MST 2,4,4
LOD A,4,8
CHK A,-1,0
PAR A
LOC 20
CUP A,2,JUMPS009
CHK A,-1,0
STR A,4,24
L3 LAB
LDC B,0
STR B,4,12
LOD A,4,24
LDC N
NEQ A
FJP L4
MST 2,4,4
LOC 30
LOD A,4,24
CHK A,-1,0
PAR A
CUP A,2,AFTER044
CHK A,-1,0
STR A,4,20
LOD A,4,20
LDC N
NEQ A
FJP L5
LOC 40
MST 2,4,4
LOD A,4,20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,63
EQU I
FJP L6
MST 2,4,4
LOD A,4,20
LOC 50
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,4,24
LDC B,1
STR B,4,12
LOD I,1,41536
LDC I,1
ADI
LOC 60
STR I,1,41536
L6 LAB
L5 LAB
L4 LAB
LOD B,4,12
NOT
FJP L3
MST 2,4,4
LOD A,4,8
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
LOC 70
STR A,4,16
LOD A,4,16
CHK A,0,0
INC A,4
LOD A,4,24
CHK A,-1,0
STO A
L2 LAB
RET P
L1 DEF 28
LOC 0
CONC$165 ENT P,3,L1 CONC_PASS1 1 1 1
LOD A,1,324
CHK A,-1,0
STR A,2,24
L2 LAB
LOD A,2,24
LDC N
NEQ A
FJP L3
MST 2,4,4
LOD A,2,24
LOC 10
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,20
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LOC 20
CHK I,0,285
STR I,2,40
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
ORD
CHK S,0,63
LDC S,(0,0,0,20)
LOC 30
INN
FJP L4
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
FJP L5
LOC 40
MST 4,4,4
LOD A,2,24
CHK A,-1,0
PAR A
CUP P,2,JMPX$167
L5 LAB
MST 4,4,4
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
LOC 50
CUP A,2,JUMPS009
CHK A,-1,0
PAR A
CUP P,2,INSER166
L4 LAB
LOD A,2,20
CHK A,-1,0
STR A,2,24
UJP L2
L3 LAB
LOD A,1,320
LDC N
LOC 60
NEQ A
FJP L6
L7 LAB
LOD A,1,320
CHK A,0,0
IND A,0
LDC N
NEQ A
FJP L8
LOD A,1,320
CHK A,0,0
LOC 70
IND A,0
CHK A,-1,0
STR A,1,320
UJP L7
L8 LAB
L6 LAB
RET P
L1 DEF 8
SST P PEEPH168 3 4 0 12 4
SST P DELET169 4 12 0 8 12
LOC 0
DELET169 ENT P,4,L1 DELETE_INSTR 1 1 1
LOD A,4,8
CHK A,-1,0
STR A,4,20
L2 LAB
LOD A,4,20
LOD A,4,12
NEQ A
FJP L3
LOD A,4,20
CHK A,-1,0
LOC 10
STR A,4,8
LOD A,4,20
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,4,20
UJP L2
L3 LAB
LDA 1,23728
MST 2,4,4
LOD A,4,12
LOC 20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
CHK I,0,4
STR I,4,24
LOD A,4,12
CHK A,0,0
LOC 30
IND A,0
CHK A,-1,0
STR A,4,20
LOD I,1,316
LDC I,1
SBI
CHK I,0,999999
STR I,1,316
LOD I,4,24
LDC I,0
LOC 40
NEQ I
FJP L4
LOD I,3,20
LDC I,1
ADI
STR I,3,20
LOD I,4,16
LDC I,2
NEQ I
LOD I,4,16
LOC 50
LDC I,3
NEQ I
AND
MST 2,12,12
LOD A,4,12
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
LOC 60
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
AND
FJP L5
LOD A,4,20
LOC 70
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,4,20
LOD I,1,316
LDC I,1
SBI
CHK I,0,999999
STR I,1,316
LOD I,3,20
LOC 80
LDC I,1
ADI
STR I,3,20
L5 LAB
LOD I,4,16
LDC I,1
NEQ I
LOD I,4,16
LDC I,3
NEQ I
AND
LOC 90
MST 2,12,12
LOD A,4,12
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
LOC 100
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
AND
FJP L6
LOD A,4,20
CHK A,0,0
IND A,0
CHK A,-1,0
LOC 110
STR A,4,20
LOD I,1,316
LDC I,1
SBI
CHK I,0,999999
STR I,1,316
LOD I,3,20
LDC I,1
ADI
STR I,3,20
L6 LAB
LOC 120
LOD I,4,24
LDC I,4
EQU I
LOD I,4,24
LDC I,2
EQU I
IOR
FJP L7
LOD A,4,20
CHK A,0,0
LOC 130
IND A,0
CHK A,-1,0
STR A,4,20
LOD I,1,316
LDC I,1
SBI
CHK I,0,999999
STR I,1,316
L7 LAB
L4 LAB
LOD A,4,8
CHK A,0,0
LOC 140
LOD A,4,20
CHK A,-1,0
STO A
RET P
L1 DEF 28
SST P SKIP$170 4 8 0 32 8
LOC 0
SKIP$170 ENT P,4,L1 SKIP_JMPA_OP 1 1 1
MST 2,4,4
LOD A,4,8
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,4,28
MST 2,4,4
LOD A,4,28
LOC 10
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,63
EQU I
MST 2,12,12
LOD A,4,28
CHK A,0,0
INC A,4
PAR A
LOC 20
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
NEQ I
AND
LOC 30
FJP L2
MST 3,8,8
LOD A,4,8
CHK A,-1,0
PAR A
LOD I,4,12
PAR I
CUP I,4,INSTR164
CHK I,1,3
STR I,4,40
LOC 40
MST 3,8,8
LOD A,4,28
CHK A,-1,0
PAR A
LOD I,4,12
LOD I,4,40
LDC I,4
MPI
ADI
PAR I
LOC 50
CUP I,4,INSTR164
CHK I,1,3
STR I,4,36
MST 2,4,4
LOD A,4,28
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,4,24
LOC 60
MST 2,4,4
LOD A,4,24
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,2
EQU I
NOT
FJP L3
MST 2,4,4
LOC 70
LCA 'SKIP_JMPA001'
PAR A
CUP P,2,ASSER003
L3 LAB
MST 2,12,12
LOD A,4,24
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
LOC 80
PAR I
LDC I,24
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,16777215
STR I,4,32
LOD I,4,32
LDC I,16777215
NEQ I
LOC 90
FJP L4
LOD I,4,32
LOD I,4,12
SBI
LDC I,4
DVI
STR I,4,44
LOD I,4,44
LDC I,0
GRT I
LOC 100
FJP L5
LOD I,4,44
LOD I,4,36
LOD I,3,20
ADI
SBI
STR I,4,44
L5 LAB
UJP L6
L4 LAB
MST 3,8,8
LOD A,4,8
LOC 110
CHK A,-1,0
PAR A
LOD I,4,12
PAR I
CUP I,4,INSTR164
STR I,4,44
MST 2,4,4
LOD A,4,28
CHK A,-1,0
PAR A
LOC 120
CUP A,2,NEXT$043
CHK A,-1,0
STR A,4,20
L7 LAB
LOD I,4,44
LDC I,7
LEQ I
LOD A,4,20
LOD A,4,24
NEQ A
AND
LOC 130
LOD A,4,20
LDC N
NEQ A
AND
FJP L8
LOD I,4,44
MST 3,8,8
LOD A,4,20
CHK A,-1,0
PAR A
LOC 140
LOD I,4,12
LOD I,4,44
LDC I,4
MPI
ADI
PAR I
CUP I,4,INSTR164
ADI
STR I,4,44
MST 2,4,4
LOC 150
LOD A,4,20
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,4,20
UJP L7
L8 LAB
L6 LAB
LDC I,-8
LOD I,4,44
LEQ I
LOC 160
LOD I,4,44
LDC I,7
LEQ I
AND
FJP L9
LOD I,1,41540
LDC I,1
ADI
STR I,1,41540
MST 2,4,4
LOC 170
LOD A,4,8
CHK A,-1,0
PAR A
CUP P,2,INVER045
MST 2,4,4
LOD A,4,28
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
LOC 180
STR A,4,16
MST 2,4,4
LOD A,4,16
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,2
EQU I
NOT
FJP L10
LOC 190
MST 2,4,4
LCA 'TRY_SKIP 001'
PAR A
CUP P,2,ASSER003
L10 LAB
MST 2,4,4
LOD A,4,8
CHK A,-1,0
PAR A
CUP A,2,AFTER042
CHK A,-1,0
LOC 200
STR A,4,20
LOD A,4,20
CHK A,0,0
INC A,4
LOD A,4,24
CHK A,-1,0
STO A
MST 4,12,12
LOD A,4,8
CHK A,-1,0
LOC 210
PAR A
LOD A,4,28
CHK A,-1,0
PAR A
LDC I,0
CHK I,0,3
PAR I
CUP P,6,DELET169
MST 4,12,12
LOD A,4,8
LOC 220
CHK A,-1,0
PAR A
LOD A,4,16
CHK A,-1,0
PAR A
LDC I,0
CHK I,0,3
PAR I
CUP P,6,DELET169
L9 LAB
L2 LAB
RET P
L1 DEF 48
SST P COLLA171 4 12 0 24 12
LOC 0
COLLA171 ENT P,4,L1 COLLAPSE_MOV 1 1 1
MST 2,8,8
LOD A,4,12
CHK A,-1,0
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP I,4,S1OPN041
STR I,4,24
LOC 10
MST 2,4,4
LOD A,4,8
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK I,0,285
STR I,4,32
LOD I,4,24
LDC I,0
GEQ I
LOC 20
LDA 1,29164
LOD I,4,32
CHK J,0,285
IXA 4
IND I,0
LOD I,4,16
EQU I
AND
LDA 1,30308
LOD I,4,32
LOC 30
CHK J,0,285
IXA 1
IND B,0
AND
FJP L2
MST 2,4,4
LOD A,4,12
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
LOC 40
CHK A,-1,0
STR A,4,36
LDC B,0
STR B,4,41
LOD A,4,36
LDC N
NEQ A
STR B,4,40
L3 LAB
LOD B,4,40
LOD B,4,41
LOC 50
NOT
AND
FJP L4
MST 2,4,4
LOD A,4,36
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,3
NEQ I
LOC 60
FJP L5
LDC B,0
STR B,4,40
UJP L6
L5 LAB
MST 2,12,12
LOD A,4,36
CHK A,0,0
INC A,4
PAR A
LDC I,12
LOC 70
CHK I,0,35
PAR I
LDC I,24
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOD I,4,24
EQU I
FJP L7
LDC B,1
LOC 80
STR B,4,41
UJP L8
L7 LAB
MST 2,4,4
LOD A,4,36
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,4,36
LOD A,4,36
LOC 90
LDC N
NEQ A
STR B,4,40
L8 LAB
L6 LAB
UJP L3
L4 LAB
LOD B,4,41
FJP L9
MST 2,12,12
LOD A,4,12
CHK A,0,0
INC A,4
LOC 100
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
CUP I,6,GETFI020
STR I,4,28
LDA 1,23728
LOC 110
LOD I,4,32
CHK J,0,285
IXA 4
IND I,0
LDC I,3
EQU I
FJP L10
MST 2,8,8
LOD A,4,8
CHK A,-1,0
LOC 120
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP I,4,S1OPN041
LOD I,4,24
EQU I
FJP L11
LOD I,1,41544
LDC I,1
LOC 130
ADI
STR I,1,41544
MST 2,16,16
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LOC 140
LDC I,12
CHK I,1,36
PAR I
LOD I,4,28
PAR I
CUP P,8,PUTFI022
MST 4,12,12
LOD A,4,8
CHK A,-1,0
PAR A
LOC 150
LOD A,4,12
CHK A,-1,0
PAR A
LDC I,1
CHK I,0,3
PAR I
CUP P,6,DELET169
L11 LAB
UJP L12
L10 LAB
LDA 1,23728
LOD I,4,32
LOC 160
CHK J,0,285
IXA 4
IND I,0
LDC I,1
EQU I
NOT
FJP L13
MST 2,4,4
LCA 'COLLAPSE 001'
PAR A
LOC 170
CUP P,2,ASSER003
L13 LAB
MST 2,12,12
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,10
CHK I,0,35
PAR I
LDC I,2
LOC 180
CHK I,1,36
PAR I
CUP I,6,GETFI020
STR I,4,20
LOD I,4,20
LDC I,1
EQU I
MST 2,8,8
LOD A,4,8
CHK A,-1,0
LOC 190
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP I,4,S1OPN041
LOD I,4,24
EQU I
AND
FJP L14
LOD I,1,41544
LOC 200
LDC I,1
ADI
STR I,1,41544
MST 2,16,16
LOD A,4,8
CHK A,-1,0
PAR A
LDC I,24
CHK I,0,35
PAR I
LOC 210
LOD A,4,12
CHK A,-1,0
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP B,8,S1OPN040
FJP L15
LDA 1,22584
LOD I,4,32
LOC 220
CHK J,0,285
IXA 4
IND I,0
LDC I,0
NEQ I
NOT
FJP L16
MST 2,4,4
LCA 'COLLAPSE 002'
PAR A
LOC 230
CUP P,2,ASSER003
L16 LAB
LOD A,4,8
CHK A,0,0
INC A,4
LDA 1,4568
MOV 8
MST 2,16,16
LOD A,4,8
CHK A,0,0
INC A,4
LOC 240
PAR A
LDC I,0
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LDA 1,5056
LDA 1,22584
LOD I,4,32
LOC 250
CHK J,0,285
IXA 4
IND I,0
CHK J,0,285
IXA 4
IND I,0
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,4,8
LOC 260
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LOD I,4,28
LOC 270
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,30
CHK I,0,35
PAR I
LOC 280
LDC I,6
CHK I,1,36
PAR I
LDC I,4
PAR I
CUP P,8,PUTFI022
MST 4,12,12
LOD A,4,8
CHK A,-1,0
PAR A
LOC 290
LOD A,4,12
CHK A,-1,0
PAR A
LDC I,0
CHK I,0,3
PAR I
CUP P,6,DELET169
UJP L17
L15 LAB
MST 2,16,16
LOD A,4,8
LOC 300
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LOD I,4,28
LOC 310
PAR I
CUP P,8,PUTFI022
MST 4,12,12
LOD A,4,8
CHK A,-1,0
PAR A
LOD A,4,12
CHK A,-1,0
PAR A
LDC I,1
LOC 320
CHK I,0,3
PAR I
CUP P,6,DELET169
L17 LAB
UJP L18
L14 LAB
LOD I,4,20
LDC I,2
EQU I
LOD I,4,24
LDC I,4
EQU I
LOC 330
AND
LOD I,4,20
LDC I,3
EQU I
LOD I,4,24
LDC I,6
EQU I
AND
IOR
FJP L19
LOC 340
MST 2,16,16
LOD A,4,8
CHK A,-1,0
PAR A
LDC I,12
CHK I,0,35
PAR I
LOD A,4,12
CHK A,-1,0
PAR A
LOC 350
LDC I,12
CHK I,0,35
PAR I
CUP B,8,S1OPN040
FJP L20
LOD I,1,41544
LDC I,1
ADI
STR I,1,41544
MST 2,16,16
LOC 360
LOD A,4,8
CHK A,0,0
INC A,4
PAR A
LDC I,10
CHK I,0,35
PAR I
LDC I,2
CHK I,1,36
PAR I
LOC 370
LDC I,0
PAR I
CUP P,8,PUTFI022
MST 4,12,12
LOD A,4,8
CHK A,-1,0
PAR A
LOD A,4,12
CHK A,-1,0
PAR A
LOC 380
LDC I,0
CHK I,0,3
PAR I
CUP P,6,DELET169
L20 LAB
L19 LAB
L18 LAB
L12 LAB
L9 LAB
L2 LAB
RET P
L1 DEF 44
LOC 0
PEEPH168 ENT P,3,L1 PEEPHOLE_OPT 1 1 1
LDC I,0
STR I,3,20
LOD A,1,324
CHK A,-1,0
STR A,2,24
LDC N
CHK A,-1,0
STR A,3,12
LOD I,1,4860
LOC 10
STR I,1,312
L2 LAB
LOD A,2,24
LDC N
NEQ A
FJP L3
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LOC 20
CHK I,0,285
STR I,2,40
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,3
EQU I
LOD A,3,12
LOC 30
LDC N
NEQ A
AND
FJP L4
L4 LAB
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,0
LOC 40
NEQ I
LOD I,2,40
LDC I,2
EQU I
IOR
FJP L5
LOD A,2,24
CHK A,-1,0
STR A,3,12
L5 LAB
MST 2,4,4
LOC 50
LOD A,2,24
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,24
UJP L2
L3 LAB
LOD I,1,41532
LOD I,3,20
ADI
LOC 60
STR I,1,41532
LOD I,1,316
CHK I,0,16777215
STR I,2,28
LOD A,3,8
LDC B,1
STO B
LDC I,0
STR I,1,41524
L6 LAB
LOD A,3,8
LOC 70
IND B,0
LOD I,1,41524
LDC I,2
LES I
AND
FJP L7
LDC I,0
STR I,3,20
LOD A,1,324
CHK A,-1,0
LOC 80
STR A,2,24
LOD I,1,4860
STR I,1,312
LOD I,2,28
LDC I,4
DVI
LDC I,2047
GRT I
STR B,2,53
L8 LAB
LOD A,2,24
LOC 90
LDC N
NEQ A
FJP L9
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK I,0,285
STR I,2,40
LOC 100
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,0
EQU I
FJP L10
LOD I,2,40
LDC I,2
LOC 110
EQU I
FJP L11
MST 2,16,16
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
LOC 120
LDC I,24
CHK I,1,36
PAR I
LOD I,1,312
PAR I
CUP P,8,PUTFI022
L11 LAB
UJP L12
L10 LAB
LDA 1,23728
LOD I,2,40
CHK J,0,285
LOC 130
IXA 4
IND I,0
LDC I,4
EQU I
FJP L13
MST 4,8,8
LOD A,2,24
CHK A,-1,0
PAR A
LOD I,1,312
LOC 140
PAR I
CUP P,4,SKIP$170
L13 LAB
L12 LAB
LOD I,1,312
MST 3,8,8
LOD A,2,24
CHK A,-1,0
PAR A
LOD I,1,312
PAR I
CUP I,4,INSTR164
LOC 150
LDC I,4
MPI
ADI
STR I,1,312
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
LOC 160
STR A,2,24
UJP L8
L9 LAB
LOD A,3,8
LOD I,3,20
LDC I,0
NEQ I
STO B
LOD I,1,312
CHK I,0,16777215
STR I,2,28
LOC 170
LOD I,1,41532
LOD I,3,20
ADI
STR I,1,41532
LOD I,1,41524
LDC I,1
ADI
STR I,1,41524
UJP L6
L7 LAB
RET P
L1 DEF 24
SST P CONC$172 3 0 0 0 0
LOC 0
CONC$172 ENT P,3,L1 CONC_PASS2 1 1 1
LOD A,1,324
CHK A,-1,0
STR A,2,24
LOD I,1,4860
STR I,1,312
LOD I,2,28
LDC I,4
DVI
LDC I,2047
LOC 10
GRT I
STR B,2,53
L2 LAB
LOD A,2,24
LDC N
NEQ A
FJP L3
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
LOC 20
CUP I,2,GETS1008
CHK I,0,285
STR I,2,40
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,0
EQU I
LOC 30
FJP L4
LOD I,2,40
LDC I,2
EQU I
FJP L5
MST 2,16,16
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LOC 40
LDC I,12
CHK I,0,35
PAR I
LDC I,24
CHK I,1,36
PAR I
LOD I,1,312
PAR I
CUP P,8,PUTFI022
L5 LAB
L4 LAB
LOD I,1,312
LOC 50
MST 3,8,8
LOD A,2,24
CHK A,-1,0
PAR A
LOD I,1,312
PAR I
CUP I,4,INSTR164
LDC I,4
MPI
ADI
LOC 60
STR I,1,312
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,24
UJP L2
L3 LAB
LOD I,1,312
LOC 70
CHK I,0,16777215
STR I,2,28
RET P
L1 DEF 8
SST P CONC$173 3 0 0 68 0
SST P PASS3174 4 12 8 4 12
LOC 0
PASS3174 ENT P,4,L1 PASS3PCRELFI 1 1 1
LDA 4,20
LOD A,4,8
MOV 8
MST 2,12,12
LDA 4,20
PAR A
LOD I,4,16
LDC I,0
ADI
LOC 10
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
NOT
FJP L2
LOC 20
MST 2,4,4
LCA 'PASS3PCRE001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,12,12
LOD A,4,12
PAR A
LDC I,1
CHK I,0,35
PAR I
LOC 30
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,1
STR I,4,28
MST 2,12,12
LDA 4,20
PAR A
LOD I,4,16
LOC 40
LDC I,1
ADI
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
LOC 50
MST 2,12,12
LDA 4,20
PAR A
LOD I,4,16
LDC I,6
ADI
CHK I,0,35
PAR I
LDC I,6
CHK I,1,36
LOC 60
PAR I
CUP I,6,GETFI020
LDC I,3
EQU I
AND
LOD I,4,28
LDC I,1
EQU I
MST 2,12,12
LOD A,4,12
LOC 70
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,3
EQU I
LOC 80
AND
IOR
FJP L3
LOD I,4,28
LDC I,1
EQU I
FJP L4
MST 2,16,16
LOD A,4,12
PAR A
LOC 90
LDC I,11
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
MST 2,12,12
LOD A,4,12
PAR A
LDC I,11
LOC 100
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
CUP I,6,GETSI021
LOD I,1,312
SBI
PAR I
CUP P,8,PUTFI022
LOC 110
UJP L5
L4 LAB
MST 2,16,16
LOD A,4,12
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,30
CHK I,1,36
PAR I
LOC 120
MST 2,12,12
LOD A,4,12
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,30
CHK I,1,36
PAR I
CUP I,6,GETSI021
LOC 130
LOD I,1,312
SBI
PAR I
CUP P,8,PUTFI022
L5 LAB
L3 LAB
RET P
L1 DEF 32
SST P INSER175 4 0 0 56 0
LOC 0
INSER175 ENT P,4,L1 INSERT_NOP 1 1 1
MST 2,16,16
LOD A,2,8
CHK A,-1,0
PAR A
LDC I,153
CHK I,0,285
PAR I
LDA 1,4512
PAR A
LOC 10
LDA 1,4512
PAR A
CUP P,8,INSER101
LOD I,2,36
LDC I,4
ADI
CHK I,0,16777215
STR I,2,36
RET P
L1 DEF 64
LOC 0
CONC$173 ENT P,3,L1 CONC_PASS3 1 1 1
LOD A,1,324
CHK A,-1,0
STR A,2,24
LOD I,1,4860
STR I,1,312
LOD I,2,28
LDC I,4
DVI
LDC I,2047
LOC 10
GRT I
STR B,2,53
L2 LAB
LOD A,2,24
LDC N
NEQ A
FJP L3
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
LOC 20
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,20
LOD I,1,312
CHK I,0,16777215
STR I,2,36
MST 2,4,4
LOD A,2,24
CHK A,-1,0
PAR A
LOC 30
CUP I,2,GETS1008
CHK I,0,285
STR I,2,40
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,0
EQU I
LOC 40
FJP L4
LOD I,2,40
LDC I,2
EQU I
FJP L5
MST 2,12,12
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LOC 50
LDC I,12
CHK I,0,35
PAR I
LDC I,24
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOD I,1,312
EQU I
NOT
LOC 60
FJP L6
MST 2,4,4
LCA 'CODE_CONC002'
PAR A
CUP P,2,ASSER003
L6 LAB
L5 LAB
UJP L7
L4 LAB
LDA 2,44
LOD A,2,24
CHK A,0,0
INC A,4
LOC 70
MOV 8
LOD I,2,36
LDC I,4
ADI
CHK I,0,16777215
STR I,2,36
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
LOC 80
STR A,2,12
MST 2,12,12
LDA 2,44
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LOC 90
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L8
LOD I,2,36
LDC I,4
ADI
CHK I,0,16777215
STR I,2,36
MST 2,12,12
LOC 100
LDA 2,44
PAR A
LDC I,30
CHK I,0,35
PAR I
LDC I,6
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
LOC 110
GRT I
MST 2,12,12
LDA 2,44
PAR A
LDC I,25
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
LOC 120
CUP I,6,GETFI020
LDC I,1
EQU I
AND
NOT
FJP L9
MST 4,12,12
LDA 2,44
PAR A
LOD A,2,12
LOC 130
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP P,6,PASS3174
L9 LAB
LOD A,2,12
CHK A,0,0
IND A,0
LOC 140
CHK A,-1,0
STR A,2,12
L8 LAB
MST 2,12,12
LDA 2,44
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
LOC 150
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L10
LOD I,2,36
LDC I,4
ADI
CHK I,0,16777215
STR I,2,36
LOC 160
MST 2,12,12
LDA 2,44
PAR A
LDC I,18
CHK I,0,35
PAR I
LDC I,6
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 170
LDC I,0
GRT I
MST 2,12,12
LDA 2,44
PAR A
LDC I,13
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
LOC 180
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
AND
NOT
FJP L11
MST 4,12,12
LDA 2,44
PAR A
LOC 190
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
PAR I
CUP P,6,PASS3174
L11 LAB
LOD A,2,12
CHK A,0,0
LOC 200
IND A,0
CHK A,-1,0
STR A,2,12
L10 LAB
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,4
EQU I
LOC 210
FJP L12
LOD A,2,12
CHK A,0,0
IND A,4
CHK A,-1,0
STR A,2,16
LOD A,2,16
LDC N
NEQ A
FJP L13
LOC 220
MST 2,4,4
LOD A,2,16
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,2
EQU I
NOT
FJP L14
MST 2,4,4
LOC 230
LCA 'CODE_CONC003'
PAR A
CUP P,2,ASSER003
L14 LAB
MST 2,12,12
LOD A,2,16
CHK A,0,0
INC A,4
PAR A
LDC I,12
CHK I,0,35
LOC 240
PAR I
LDC I,24
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,16777215
STR I,2,32
LOD I,2,32
LDC I,16777215
NEQ I
LOC 250
NOT
FJP L15
MST 2,4,4
LCA 'CODE_CONC004'
PAR A
CUP P,2,ASSER003
L15 LAB
LOD I,2,32
LOD I,1,312
SBI
LDC I,4
LOC 260
DVI
CHK I,-8,7
STR I,3,8
LDC I,-8
LOD I,3,8
LEQ I
LOD I,3,8
LDC I,7
LEQ I
AND
LOC 270
NOT
FJP L16
MST 2,4,4
LCA 'CODE_CONC005'
PAR A
CUP P,2,ASSER003
L16 LAB
MST 2,16,16
LOD A,2,24
CHK A,0,0
INC A,4
LOC 280
PAR A
LDC I,8
CHK I,0,35
PAR I
LDC I,4
CHK I,1,36
PAR I
LOD I,3,8
PAR I
CUP P,8,PUTFI022
L13 LAB
LOC 290
UJP L17
L12 LAB
LDA 1,23728
LOD I,2,40
CHK J,0,285
IXA 4
IND I,0
LDC I,2
EQU I
FJP L18
LOD A,2,12
LOC 300
CHK A,0,0
IND A,4
CHK A,-1,0
STR A,2,16
LOD A,2,12
CHK A,-1,0
STR A,2,8
MST 2,12,12
LDA 2,44
PAR A
LOC 310
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
STR B,3,72
LOC 320
LOD A,2,16
LDC N
EQU A
FJP L19
LOD I,1,312
CHK I,0,16777215
STR I,2,32
MST 2,16,16
LOD A,2,24
CHK A,0,0
LOC 330
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,0
PAR I
LOC 340
CUP P,8,PUTFI022
UJP L20
L19 LAB
MST 2,4,4
LOD A,2,16
CHK A,-1,0
PAR A
CUP I,2,GETS1008
LDC I,2
EQU I
NOT
LOC 350
FJP L21
MST 2,4,4
LCA 'CODE_CONC006'
PAR A
CUP P,2,ASSER003
L21 LAB
MST 2,12,12
LOD A,2,16
CHK A,0,0
INC A,4
PAR A
LOC 360
LDC I,12
CHK I,0,35
PAR I
LDC I,24
CHK I,1,36
PAR I
CUP I,6,GETFI020
CHK I,0,16777215
STR I,2,32
LOD I,2,32
LOC 370
LDC I,16777215
NEQ I
NOT
FJP L22
MST 2,4,4
LCA 'CODE_CONC007'
PAR A
CUP P,2,ASSER003
L22 LAB
LOD I,2,32
LOD I,1,312
LOC 380
SBI
LDC I,4
DVI
STR I,3,12
LDC I,-2048
LOD I,3,12
LEQ I
LOD I,3,12
LDC I,2047
LEQ I
LOC 390
AND
MST 2,12,12
LDA 2,44
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LOC 400
CUP I,6,GETFI020
LDC I,0
EQU I
AND
FJP L23
MST 2,16,16
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LOC 410
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
PAR I
CUP P,8,PUTFI022
MST 2,16,16
LOC 420
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,12
CHK I,1,36
PAR I
LOC 430
LOD I,3,12
PAR I
CUP P,8,PUTFI022
UJP L24
L23 LAB
MST 2,16,16
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LDC I,11
LOC 440
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,0
PAR I
CUP P,8,PUTFI022
MST 2,12,12
LDA 2,44
LOC 450
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
LOC 460
FJP L25
LOD B,2,53
NOT
FJP L26
MST 2,4,4
LCA 'CODE_CONC010'
PAR A
CUP P,2,ASSER003
L26 LAB
LOD I,2,36
LDC I,4
LOC 470
ADI
CHK I,0,16777215
STR I,2,36
MST 2,4,4
LDA 2,12
PAR A
CUP P,2,NEWCO019
LOD A,2,12
CHK A,0,0
LOD A,2,24
LOC 480
CHK A,0,0
IND A,0
CHK A,-1,0
STO A
LOD A,2,24
CHK A,0,0
LOD A,2,12
CHK A,-1,0
STO A
LDA 3,16
LOC 490
LDA 1,4400
MOV 56
LDC I,1
CHK I,0,1
STR I,3,16
LDC I,0
CHK I,-32,31
STR I,3,24
LDC I,1
CHK I,0,31
LOC 500
STR I,3,20
LDC I,1
CHK I,0,1
STR I,3,40
LDC I,3
CHK I,0,31
STR I,3,56
LOD I,1,312
NGI
CHK I,-16777216,16777215
LOC 510
STR I,3,60
MST 2,16,16
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LOD A,2,12
CHK A,-1,0
PAR A
LDA 3,16
LOC 520
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP P,8,BUILD096
LOD I,1,316
LDC I,1
ADI
CHK I,0,999999
STR I,1,316
L25 LAB
LOC 530
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,12
MST 2,16,16
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LOC 540
LDC I,11
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
MST 2,12,12
LOD A,2,12
CHK A,0,0
INC A,4
LOC 550
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
CUP I,6,GETSI021
LOD I,2,32
ADI
LOC 560
PAR I
CUP P,8,PUTFI022
L24 LAB
L20 LAB
LOD B,3,72
FJP L27
L28 LAB
LOD I,2,36
LOD I,1,312
SBI
LDC I,2
LDC I,4
MPI
LOC 570
LES I
FJP L29
MST 4,0,0
CUP P,0,INSER175
UJP L28
L29 LAB
LOD I,2,36
LOD I,1,312
SBI
LDC I,2
LDC I,4
LOC 580
MPI
EQU I
NOT
FJP L30
MST 2,4,4
LCA 'CODE_CONC008'
PAR A
CUP P,2,ASSER003
L30 LAB
UJP L31
L27 LAB
LOD I,2,32
LOC 590
LOD I,1,312
GRT I
FJP L32
MST 2,12,12
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LDC I,11
CHK I,0,35
LOC 600
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
LOD B,2,53
AND
FJP L33
LOC 610
MST 4,0,0
CUP P,0,INSER175
L33 LAB
L32 LAB
L31 LAB
L18 LAB
L17 LAB
L7 LAB
LOD A,2,20
CHK A,-1,0
STR A,2,24
LOD I,2,36
STR I,1,312
UJP L2
L3 LAB
LOD I,2,28
LOD I,1,312
LOC 620
EQU I
NOT
FJP L34
MST 2,4,4
LCA 'CODE_CONC009'
PAR A
CUP P,2,ASSER003
L34 LAB
LDC B,1
STR B,1,35756
RET P
L1 DEF 76
LOC 0
CODE$163 ENT P,2,L1 CODE_CONCRET 1 1 1
MST 3,0,0
CUP P,0,CONC$165
MST 3,4,4
LDA 2,52
PAR A
CUP P,2,PEEPH168
LOD B,2,52
FJP L2
MST 3,0,0
LOC 10
CUP P,0,CONC$172
L2 LAB
MST 3,0,0
CUP P,0,CONC$173
RET P
L1 DEF 56
SST P INIT$176 2 0 0 12 0
LOC 0
INIT$176 ENT P,2,L1 INIT_SEGMENT 1 1 1
LDA 1,5052
NEW 12
LDA 1,316
LDA 1,4724
MOV 12
LDC B,0
STR B,1,35756
MST 2,4,4
LDA 1,328
LOC 10
PAR A
CUP P,2,NEWCO019
LDA 1,336
LDA 1,4724
MOV 12
LDC I,0
STR I,1,348
LDA 1,440
LDA 1,4724
MOV 12
LOC 20
LDC I,1
LDC I,1
SBI
CHK I,-1,30
STR I,1,39472
LDC I,0
CHK I,0,31
STR I,2,8
LDC I,31
CHK I,0,31
LOC 30
STR I,2,20
LOD I,2,8
LOD I,2,20
LEQ I
FJP L3
L2 LAB
LDA 1,35308
LOD I,2,8
CHK J,0,31
IXA 1
LDC B,1
LOC 40
STO B
LDA 1,35340
LOD I,2,8
CHK J,0,31
IXA 4
LDC I,0
CHK I,0,2
STO I
LOD I,2,8
LOD I,2,20
LOC 50
NEQ I
FJP L3
LOD I,2,8
INC I,1
CHK I,0,31
STR I,2,8
UJP L2
L3 LAB
LDC I,32
CHK I,32,39
STR I,2,12
LOC 60
LDC I,39
CHK I,32,39
STR I,2,20
LOD I,2,12
LOD I,2,20
LEQ I
FJP L5
L4 LAB
LDA 1,35468
LOD I,2,12
CHK J,32,39
LOC 70
DEC I,32
IXA 1
LDC B,1
STO B
LOD I,2,12
LOD I,2,20
NEQ I
FJP L5
LOD I,2,12
INC I,1
LOC 80
CHK I,32,39
STR I,2,12
UJP L4
L5 LAB
LDC I,8
CHK I,0,31
STR I,1,35488
LDC I,0
STR I,2,16
LDC I,196
STR I,2,20
LOC 90
LOD I,2,16
LOD I,2,20
LEQ I
FJP L7
L6 LAB
LDA 1,500
LOD I,2,16
CHK J,0,196
IXA 4
LDC N
CHK A,-1,0
LOC 100
STO A
LOD I,2,16
LOD I,2,20
NEQ I
FJP L7
LOD I,2,16
INC I,1
STR I,2,16
UJP L6
L7 LAB
LDC I,0
LOC 110
STR I,1,464
LDA 1,480
LDA 1,4724
MOV 12
LDA 1,468
LDA 1,4724
MOV 12
LDA 1,452
LDA 1,4724
MOV 12
LOC 120
LDC I,0
CHK I,0,15
STR I,1,39924
LDA 1,39476
LOD I,1,39924
CHK J,0,15
IXA 28
STR A,2,20
LOD A,2,20
INC A,4
LOC 130
LDC I,1
LDC I,1
SBI
CHK I,-1,30
STO I
LOD A,2,20
INC A,20
LDC I,0
STO I
LDA 1,392
LOC 140
LDA 1,4724
MOV 12
LDA 1,380
LDA 1,4724
MOV 12
LDA 1,356
LDA 1,4724
MOV 12
LDA 1,368
LDA 1,4724
LOC 150
MOV 12
LDA 1,428
LDA 1,4724
MOV 12
LDA 1,416
LDA 1,4724
MOV 12
LDA 1,404
LDA 1,4724
MOV 12
LOC 160
LDC I,0
STR I,1,492
LDC N
CHK A,-1,0
STR A,1,496
RET P
L1 DEF 24
SST P GEN$S177 2 0 0 148 0
SST P FIXDI178 3 8 0 4 8
LOC 0
FIXDI178 ENT P,3,L1 FIXDISP 1 1 1
MST 2,12,12
LOD A,3,8
CHK A,0,0
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,25
LOC 10
CHK I,1,36
PAR I
CUP I,6,GETSI021
STR I,3,16
LOD I,3,16
LOD I,3,12
ADI
STR I,3,16
LOD I,3,16
LDC I,16777215
LOC 20
GRT I
LOD I,3,16
LDC I,-16777216
LES I
IOR
FJP L2
MST 2,4,4
LDC I,30
CHK I,0,68
PAR I
LOC 30
CUP P,2,ERROR005
UJP L3
L2 LAB
MST 2,16,16
LOD A,3,8
CHK A,0,0
INC A,4
PAR A
LDC I,11
CHK I,0,35
PAR I
LOC 40
LDC I,25
CHK I,1,36
PAR I
LOD I,3,16
PAR I
CUP P,8,PUTFI022
L3 LAB
RET P
L1 DEF 20
SST P OPEN$179 3 16 0 0 16
LOC 0
OPEN$179 ENT P,3,L1 OPEN_SEGMENT 1 1 1
RET P
L1 DEF 24
SST P CLOSE180 3 0 0 0 0
LOC 0
CLOSE180 ENT P,3,L1 CLOSE_SEGMEN 1 1 1
LDA 1,15
CSP SIO
LCA 'EOM '
LDC I,4
LDC I,4
CSP WRS
LDA 1,5036
LDC I,8
LDC I,8
LOC 10
CSP WRS
LCA ' COMMENTS OR INSULTS'
LDC I,20
LDC I,20
CSP WRS
CSP WLN
CSP EIO
RET P
L1 DEF 8
SST P CLEAR181 3 0 0 28 0
LOC 0
CLEAR181 ENT P,3,L1 CLEAROUT_TXT 1 1 1
LOD I,1,41520
LOD I,2,140
ADI
STR I,1,41520
LOD I,2,140
LDC I,0
GRT I
FJP L2
MST 2,8,8
LOC 10
LDA 3,12
PAR A
LOD I,2,144
CHK I,0,34359738367
PAR I
CUP P,4,CVOS$033
LDA 1,15
CSP SIO
LCA 'TXT '
LDC I,4
LOC 20
LDC I,4
CSP WRS
LDC I,1
LDC I,8
CSP WRI
LDC C,' '
LDC I,1
CSP WRC
LDA 3,12
LDC I,12
LOC 30
LDC I,12
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,2,140
LDC I,2
CSP WRI
CSP EIO
LDC I,1
LOC 40
CHK I,1,4
STR I,3,8
LOD I,2,140
CHK I,1,4
STR I,3,36
LOD I,3,8
LOD I,3,36
LEQ I
FJP L4
L3 LAB
MST 2,8,8
LOC 50
LDA 3,24
PAR A
LDA 2,108
LOD I,3,8
CHK J,1,4
DEC I,1
IXA 8
PAR A
CUP P,4,CVOS$032
LDA 1,15
LOC 60
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
LDA 3,24
LDC I,12
LDC I,12
CSP WRS
CSP EIO
LOD I,3,8
LOC 70
LOD I,3,36
NEQ I
FJP L4
LOD I,3,8
INC I,1
CHK I,1,4
STR I,3,8
UJP L3
L4 LAB
LDA 1,15
CSP SIO
LOC 80
CSP WLN
CSP EIO
LDC I,0
CHK I,0,4
STR I,2,140
L2 LAB
RET P
L1 DEF 40
SST P OPEN$182 3 0 0 0 0
LOC 0
OPEN$182 ENT P,3,L1 OPEN_TXT 1 1 1
LDC I,0
CHK I,0,4
STR I,2,140
RET P
L1 DEF 8
SST P CLOSE183 3 0 0 0 0
LOC 0
CLOSE183 ENT P,3,L1 CLOSE_TXT 1 1 1
MST 3,0,0
CUP P,0,CLEAR181
RET P
L1 DEF 8
SST P OUT$T184 3 8 8 0 8
LOC 0
OUT$T184 ENT P,3,L1 OUT_TXT 1 1 1
LDA 3,16
LOD A,3,12
MOV 8
LOD I,2,140
LDC I,4
GEQ I
LOD A,3,8
IND I,0
LOD I,2,148
LOC 10
NEQ I
IOR
FJP L2
MST 3,0,0
CUP P,0,CLEAR181
L2 LAB
LOD I,2,140
LDC I,0
EQU I
FJP L3
LOD A,3,8
LOC 20
IND I,0
CHK I,0,1073741823
STR I,2,144
LOD A,3,8
IND I,0
CHK I,0,1073741823
STR I,2,148
L3 LAB
LOD I,2,140
LDC I,1
ADI
LOC 30
CHK I,0,4
STR I,2,140
LDA 2,108
LOD I,2,140
CHK J,1,4
DEC I,1
IXA 8
LDA 3,16
MOV 8
LOD A,3,8
LOC 40
LOD A,3,8
IND I,0
LDC I,4
ADI
CHK I,0,1073741823
STO I
LOD A,3,8
IND I,0
CHK I,0,1073741823
STR I,2,148
LOC 50
RET P
L1 DEF 24
SST P OPEN$185 3 0 0 0 0
LOC 0
OPEN$185 ENT P,3,L1 OPEN_SEG 1 1 1
RET P
L1 DEF 8
SST P CLOSE186 3 0 0 0 0
LOC 0
CLOSE186 ENT P,3,L1 CLOSE_SEG 1 1 1
RET P
L1 DEF 8
SST P OUT$S187 3 24 28 24 24
LOC 0
OUT$S187 ENT P,3,L1 OUT_SEG 1 1 1
LDA 3,49
LOD A,3,8
MOV 8
LDA 3,32
LOD A,3,28
MOV 17
MST 2,8,8
LDA 3,72
PAR A
LOC 10
LOD I,3,20
CHK I,0,34359738367
PAR I
CUP P,4,CVOS$033
MST 2,8,8
LDA 3,60
PAR A
LOD I,3,24
CHK I,0,34359738367
PAR I
LOC 20
CUP P,4,CVOS$033
LDA 1,15
CSP SIO
LCA 'SEG '
LDC I,4
LDC I,4
CSP WRS
LDA 3,49
LDC I,8
LDC I,8
LOC 30
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LDA 1,35700
LOD I,3,12
CHK J,0,2
IXA 4
LDC I,4
LDC I,4
LOC 40
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,3,16
LDC I,8
CSP WRI
LDC C,' '
LDC I,1
CSP WRC
LOC 50
LDA 3,72
LDC I,12
LDC I,12
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LDA 3,60
LDC I,12
LDC I,12
LOC 60
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LDA 3,32
LDC I,17
LDC I,17
CSP WRS
CSP WLN
CSP EIO
LOC 70
RET P
L1 DEF 84
SST P OPEN$188 3 0 0 0 0
LOC 0
OPEN$188 ENT P,3,L1 OPEN_ESD 1 1 1
RET P
L1 DEF 8
SST P CLOSE189 3 0 0 0 0
LOC 0
CLOSE189 ENT P,3,L1 CLOSE_ESD 1 1 1
RET P
L1 DEF 8
SST P OUT$E190 3 20 8 12 20
LOC 0
OUT$E190 ENT P,3,L1 OUT_ESD 1 1 1
LDA 3,28
LOD A,3,8
MOV 8
MST 2,8,8
LDA 3,36
PAR A
LOD I,3,20
CHK I,0,34359738367
PAR I
LOC 10
CUP P,4,CVOS$033
LDA 1,15
CSP SIO
LCA 'ESD '
LDC I,4
LDC I,4
CSP WRS
LDA 3,28
LDC I,8
LDC I,8
LOC 20
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LDA 1,35712
LOD I,3,12
CHK J,0,3
IXA 4
LDC I,4
LDC I,4
LOC 30
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,3,16
LDC I,8
CSP WRI
LDC C,' '
LDC I,1
CSP WRC
LOC 40
LDA 3,36
LDC I,12
LDC I,12
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,3,24
LDC I,8
CSP WRI
LOC 50
CSP WLN
CSP EIO
RET P
L1 DEF 48
SST P OPEN$191 3 0 0 0 0
LOC 0
OPEN$191 ENT P,3,L1 OPEN_ESR 1 1 1
RET P
L1 DEF 8
SST P CLOSE192 3 0 0 0 0
LOC 0
CLOSE192 ENT P,3,L1 CLOSE_ESR 1 1 1
RET P
L1 DEF 8
SST P OUT$E193 3 12 8 0 12
LOC 0
OUT$E193 ENT P,3,L1 OUT_ESR 1 1 1
LDA 3,20
LOD A,3,8
MOV 8
LDA 1,15
CSP SIO
LCA 'ESR '
LDC I,4
LDC I,4
CSP WRS
LOC 10
LDA 3,20
LDC I,8
LDC I,8
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LDA 1,35728
LOD I,3,12
CHK J,0,3
LOC 20
IXA 4
LDC I,4
LDC I,4
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,3,16
LDC I,8
CSP WRI
LOC 30
CSP WLN
CSP EIO
RET P
L1 DEF 28
SST P OPEN$194 3 0 0 0 0
LOC 0
OPEN$194 ENT P,3,L1 OPEN_RLD 1 1 1
RET P
L1 DEF 8
SST P CLOSE195 3 0 0 0 0
LOC 0
CLOSE195 ENT P,3,L1 CLOSE_RLD 1 1 1
RET P
L1 DEF 8
SST P OUT$R196 3 24 8 12 24
LOC 0
OUT$R196 ENT P,3,L1 OUT_RLD 1 1 1
LDA 3,32
LOD A,3,8
MOV 8
MST 2,8,8
LDA 3,40
PAR A
LOD I,3,24
CHK I,0,34359738367
PAR I
LOC 10
CUP P,4,CVOS$033
LDA 1,15
CSP SIO
LCA 'RLD '
LDC I,4
LDC I,4
CSP WRS
LDA 3,32
LDC I,8
LDC I,8
LOC 20
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LDA 1,35744
LOD I,3,12
CHK J,0,2
IXA 1
IND C,0
LDC I,1
LOC 30
CSP WRC
LDC C,' '
LDC I,1
CSP WRC
LDA 1,35747
LOD I,3,16
CHK J,0,1
IXA 2
LDC I,2
LDC I,2
LOC 40
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,3,20
LDC I,8
CSP WRI
LDC C,' '
LDC I,1
CSP WRC
LOC 50
LDA 3,40
LDC I,12
LDC I,12
CSP WRS
LDC C,' '
LDC I,1
CSP WRC
LOD I,3,28
LDC I,8
CSP WRI
LOC 60
CSP WLN
CSP EIO
RET P
L1 DEF 52
LOC 0
GEN$S177 ENT P,2,L1 GEN_SEGMENT 1 1 1
LOD A,1,488
CHK A,-1,0
STR A,2,24
L2 LAB
LOD A,2,24
LDC N
NEQ A
FJP L3
MST 2,8,8
LOD A,2,24
LOC 10
CHK A,0,0
IND A,4
CHK A,-1,0
PAR A
LOD I,1,464
PAR I
CUP P,4,FIXOP048
LOD A,2,24
CHK A,0,0
IND A,0
LOC 20
CHK A,-1,0
STR A,2,24
UJP L2
L3 LAB
LOD A,1,476
CHK A,-1,0
STR A,2,24
LOD I,1,464
NGI
STR I,2,32
L4 LAB
LOD A,2,24
LOC 30
LDC N
NEQ A
FJP L5
MST 2,8,8
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,-1,0
PAR A
LOD I,2,32
LOC 40
PAR I
CUP P,4,FIXOP048
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L4
L5 LAB
LOD A,1,460
CHK A,-1,0
LOC 50
STR A,2,24
L6 LAB
LOD A,2,24
LDC N
NEQ A
FJP L7
MST 2,8,8
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,-1,0
LOC 60
PAR A
LDC I,24
CHK I,0,35
PAR I
CUP A,4,PTR$O039
CHK A,-1,0
STR A,2,8
LOD A,2,8
LDC N
NEQ A
LOC 70
NOT
FJP L8
MST 2,4,4
LCA 'GEN_SEGME001'
PAR A
CUP P,2,ASSER003
L8 LAB
MST 2,12,12
LOD A,2,8
CHK A,0,0
INC A,4
LOC 80
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
CUP I,6,GETSI021
STR I,2,28
LOD I,2,28
LOC 90
NGI
LDC I,8
MPI
STR I,2,28
MST 2,16,16
LOD A,2,8
CHK A,0,0
INC A,4
PAR A
LDC I,11
LOC 100
CHK I,0,35
PAR I
LDC I,25
CHK I,1,36
PAR I
LOD I,2,28
PAR I
CUP P,8,PUTFI022
LOD A,2,24
CHK A,0,0
LOC 110
IND A,0
CHK A,-1,0
STR A,2,24
UJP L6
L7 LAB
LDC I,0
CHK I,0,196
STR I,2,36
LDC I,196
CHK I,0,196
STR I,2,156
LOC 120
LOD I,2,36
LOD I,2,156
LEQ I
FJP L10
L9 LAB
LDA 1,500
LOD I,2,36
CHK J,0,196
IXA 4
IND A,0
CHK A,-1,0
LOC 130
STR A,2,40
L11 LAB
LOD A,2,40
LDC N
NEQ A
FJP L12
LOD A,2,40
CHK A,0,0
IND B,8
NOT
FJP L13
LOC 140
LOD A,2,40
CHK A,0,0
IND I,0
STR I,1,332
MST 2,4,4
LDC I,35
CHK I,0,68
PAR I
CUP P,2,ERROR005
L13 LAB
LOD A,2,40
LOC 150
CHK A,0,0
IND A,4
CHK A,-1,0
STR A,2,40
UJP L11
L12 LAB
LOD I,2,36
LOD I,2,156
NEQ I
FJP L10
LOD I,2,36
LOC 160
INC I,1
CHK I,0,196
STR I,2,36
UJP L9
L10 LAB
LOD I,1,39472
LDC I,1
LDC I,1
SBI
NEQ I
FJP L14
LOC 170
MST 2,4,4
LDC I,62
CHK I,0,68
PAR I
CUP P,2,ERROR005
L14 LAB
LOD I,1,39924
LDC I,0
NEQ I
FJP L15
MST 2,4,4
LOC 180
LDC I,40
CHK I,0,68
PAR I
CUP P,2,ERROR005
L15 LAB
MST 2,0,0
CUP P,0,CODE$163
LOD A,1,448
CHK A,-1,0
STR A,2,24
L16 LAB
LOD A,2,24
LOC 190
LDC N
NEQ A
FJP L17
MST 3,8,8
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,-1,0
PAR A
LOD I,1,312
LOC 200
PAR I
CUP P,4,FIXDI178
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L16
L17 LAB
LOD I,1,312
LOD I,1,336
LOC 210
LDC I,4
MPI
ADI
STR I,1,312
LOD A,1,436
CHK A,-1,0
STR A,2,24
L18 LAB
LOD A,2,24
LDC N
NEQ A
LOC 220
FJP L19
MST 3,8,8
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,-1,0
PAR A
LOD I,1,312
PAR I
CUP P,4,FIXDI178
LOC 230
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L18
L19 LAB
LOD I,1,312
LOD I,1,392
LDC I,4
MPI
LOC 240
ADI
STR I,1,312
LOD A,1,424
CHK A,-1,0
STR A,2,24
L20 LAB
LOD A,2,24
LDC N
NEQ A
FJP L21
MST 3,8,8
LOC 250
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,-1,0
PAR A
LOD I,1,312
PAR I
CUP P,4,FIXDI178
LOD A,2,24
CHK A,0,0
LOC 260
IND A,0
CHK A,-1,0
STR A,2,24
UJP L20
L21 LAB
LOD I,1,312
LOD I,1,380
LDC I,4
MPI
ADI
STR I,1,312
LOC 270
LOD A,1,412
CHK A,-1,0
STR A,2,24
L22 LAB
LOD A,2,24
LDC N
NEQ A
FJP L23
MST 3,8,8
LOD A,2,24
CHK A,0,0
LOC 280
IND A,4
CHK A,-1,0
PAR A
LOD I,1,312
PAR I
CUP P,4,FIXDI178
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
LOC 290
STR A,2,24
UJP L22
L23 LAB
LOD I,1,312
LOD I,1,356
LDC I,4
MPI
ADI
STR I,1,312
LOD I,1,312
STR I,2,56
LOC 300
LOD B,1,305
FJP L24
LOD A,1,324
CHK A,-1,0
STR A,2,20
LOD I,1,4860
STR I,2,60
L25 LAB
LOD A,2,20
LDC N
NEQ A
LOC 310
FJP L26
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK I,0,285
STR I,2,72
LDA 2,100
LOD A,2,20
LOC 320
CHK A,0,0
INC A,4
MOV 8
LDA 1,23728
LOD I,2,72
CHK J,0,285
IXA 4
IND I,0
ORD
CHK I,0,4
LOC 330
XJP L27
L31 LAB
LOD I,2,72
LDC I,1
EQU I
FJP L32
MST 2,8,8
LDA 2,92
PAR A
LOD I,2,60
PAR I
LOC 340
CUP P,4,INTEG025
MST 2,8,8
LDA 1,368
PAR A
LDA 2,92
PAR A
CUP P,4,EMIT$102
L32 LAB
UJP L30
L33 LAB
LOD I,2,60
LDC I,4
LOC 350
ADI
STR I,2,60
MST 2,12,12
LDA 2,100
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
LOC 360
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L34
LOD I,2,60
LDC I,4
ADI
STR I,2,60
L34 LAB
MST 2,12,12
LOC 370
LDA 2,100
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
LOC 380
EQU I
FJP L35
LOD I,2,60
LDC I,4
ADI
STR I,2,60
L35 LAB
UJP L30
L36 LAB
LOD I,2,60
LDC I,4
ADI
LOC 390
STR I,2,60
MST 2,12,12
LDA 2,100
PAR A
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LOC 400
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L37
LOD I,2,60
LDC I,4
ADI
STR I,2,60
L37 LAB
MST 2,12,12
LDA 2,100
LOC 410
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
LOC 420
MST 2,12,12
LDA 2,100
PAR A
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LOC 430
LDC I,1
EQU I
AND
FJP L38
LOD I,2,60
LDC I,4
ADI
STR I,2,60
L38 LAB
UJP L30
L27 DEF 0
L28 DEF 4
L29 LAB
UJP L31
LOC 440
UJP L33
UJP L36
UJP L33
UJP L33
L30 LAB
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
LOC 450
STR A,2,20
UJP L25
L26 LAB
LOD I,1,312
LOD I,1,368
LDC I,4
MPI
ADI
STR I,1,312
L24 LAB
LOD B,1,304
FJP L39
LOC 460
LDA 1,13
CSP SIO
LCA '************************** ;START OF '
LDC I,39
LDC I,39
CSP WRS
LDA 1,5036
LDC I,8
LDC I,8
CSP WRS
LOC 470
LCA ' '
LDC I,2
LDC I,2
CSP WRS
LDA 1,5012
LDC I,8
LDC I,8
CSP WRS
CSP WLN
CSP EIO
LOC 480
LOD A,1,324
CHK A,-1,0
STR A,2,20
LOD I,1,4860
STR I,2,60
L40 LAB
LOD A,2,20
LDC N
NEQ A
FJP L41
MST 2,8,8
LOC 490
LDA 2,60
PAR A
LOD A,2,20
CHK A,-1,0
PAR A
CUP P,4,DISAS007
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
LOC 500
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,20
UJP L40
L41 LAB
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LOC 510
LDC I,12
CHR
LDC I,1
CSP WRC
CSP EIO
L39 LAB
LOD A,1,324
CHK A,-1,0
STR A,2,20
L42 LAB
LOD A,2,20
LDC N
LOC 520
NEQ A
FJP L43
LDA 1,40368
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
LOC 530
LDA 1,40368
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK J,0,285
IXA 4
IND I,0
LDC I,1
LOC 540
ADI
STO I
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,20
UJP L42
L43 LAB
LOC 550
LOD I,1,312
STR I,2,48
LDC I,0
STR I,2,68
LOD A,1,496
CHK A,-1,0
STR A,2,44
L44 LAB
LOD A,2,44
LDC N
NEQ A
LOC 560
FJP L45
LOD I,2,68
LOD A,2,44
CHK A,0,0
IND I,8
ADI
STR I,2,68
LOD A,2,44
CHK A,0,0
IND A,20
LOC 570
CHK A,-1,0
STR A,2,44
UJP L44
L45 LAB
MST 3,16,16
LDC I,1
PAR I
LOD I,2,48
LDC I,4
DVI
PAR I
LOC 580
LOD I,1,492
PAR I
LDC I,2
LOD I,2,68
MPI
PAR I
CUP P,8,OPEN$179
MST 3,0,0
CUP P,0,OPEN$185
MST 3,24,24
LOC 590
LDA 1,5036
PAR A
LDC I,0
CHK I,0,2
PAR I
LDC I,1
CHK I,1,1000
PAR I
LDC I,0
CHK I,0,1073741823
LOC 600
PAR I
LOD I,2,48
LDC I,0
SBI
PAR I
LCA 'IN RA '
PAR A
CUP P,12,OUT$S187
MST 3,0,0
CUP P,0,CLOSE186
LOC 610
MST 3,0,0
CUP P,0,OPEN$188
MST 3,20,20
LDA 1,5036
PAR A
LDC I,1
CHK I,0,3
PAR I
LDC I,1
CHK I,1,1000
LOC 620
PAR I
LDC I,0
CHK I,0,1073741823
PAR I
LDC I,1
CHK I,1,1000
PAR I
CUP P,10,OUT$E190
MST 3,0,0
CUP P,0,CLOSE189
LOC 630
MST 3,0,0
CUP P,0,OPEN$182
LDC I,0
STR I,1,312
MST 2,12,12
LDA 2,84
PAR A
LDA 2,76
PAR A
LDA 1,5036
LOC 640
PAR A
CUP P,6,ZSYMB024
MST 3,8,8
LDA 1,312
PAR A
LDA 2,84
PAR A
CUP P,4,OUT$T184
MST 3,8,8
LDA 1,312
LOC 650
PAR A
LDA 2,76
PAR A
CUP P,4,OUT$T184
LDA 2,92
LDA 1,4568
MOV 8
LOD B,1,305
FJP L46
MST 2,16,16
LOC 660
LDA 2,92
PAR A
LDC I,0
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
LDC I,1
PAR I
LOC 670
CUP P,8,PUTFI022
L46 LAB
MST 2,16,16
LDA 2,92
PAR A
LDC I,1
CHK I,0,35
PAR I
LDC I,5
CHK I,1,36
PAR I
LOC 680
LDA 1,35500
LOD I,1,5032
CHK J,1,8
DEC I,1
IXA 4
IND I,0
PAR I
CUP P,8,PUTFI022
MST 3,8,8
LDA 1,312
LOC 690
PAR A
LDA 2,92
PAR A
CUP P,4,OUT$T184
MST 2,8,8
LDA 2,92
PAR A
LOD I,2,56
PAR I
CUP P,4,INTEG025
LOC 700
MST 3,8,8
LDA 1,312
PAR A
LDA 2,92
PAR A
CUP P,4,OUT$T184
LOD A,1,324
CHK A,-1,0
STR A,2,20
LOD I,1,312
LOC 710
LOD I,1,4860
EQU I
NOT
FJP L47
MST 2,4,4
LCA 'GEN_SEGME002'
PAR A
CUP P,2,ASSER003
L47 LAB
L48 LAB
LOD A,2,20
LDC N
LOC 720
NEQ A
FJP L49
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,16
LOD I,1,312
LOC 730
STR I,2,52
MST 2,4,4
LOD A,2,20
CHK A,-1,0
PAR A
CUP I,2,GETS1008
CHK I,0,285
STR I,2,72
LDA 2,100
LOD A,2,20
LOC 740
CHK A,0,0
INC A,4
MOV 8
LDA 1,23728
LOD I,2,72
CHK J,0,285
IXA 4
IND I,0
ORD
CHK I,0,4
LOC 750
XJP L50
L54 LAB
UJP L53
L55 LAB
MST 3,8,8
LDA 1,312
PAR A
LDA 2,100
PAR A
CUP P,4,OUT$T184
LOD I,2,52
LDC I,4
LOC 760
ADI
STR I,2,52
LOD A,2,20
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,12
MST 2,12,12
LDA 2,100
PAR A
LOC 770
LDC I,24
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L56
LOC 780
LOD I,2,52
LDC I,4
ADI
STR I,2,52
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,12
CHK A,0,0
INC A,4
LOC 790
PAR A
CUP P,4,OUT$T184
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,12
L56 LAB
MST 2,12,12
LDA 2,100
PAR A
LOC 800
LDC I,12
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L57
LOC 810
LOD I,2,52
LDC I,4
ADI
STR I,2,52
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,12
CHK A,0,0
INC A,4
LOC 820
PAR A
CUP P,4,OUT$T184
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,12
L57 LAB
UJP L53
L58 LAB
MST 3,8,8
LDA 1,312
LOC 830
PAR A
LDA 2,100
PAR A
CUP P,4,OUT$T184
LOD I,2,52
LDC I,4
ADI
STR I,2,52
LOD A,2,20
CHK A,0,0
LOC 840
IND A,0
CHK A,-1,0
STR A,2,12
MST 2,12,12
LDA 2,100
PAR A
LDC I,11
CHK I,0,35
PAR I
LDC I,1
LOC 850
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,0
EQU I
MST 2,12,12
LDA 2,100
PAR A
LDC I,24
CHK I,0,35
LOC 860
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
AND
FJP L59
LOD I,2,52
LOC 870
LDC I,4
ADI
STR I,2,52
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LOC 880
CUP P,4,OUT$T184
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,12
L59 LAB
MST 2,12,12
LDA 2,100
PAR A
LDC I,12
LOC 890
CHK I,0,35
PAR I
LDC I,1
CHK I,1,36
PAR I
CUP I,6,GETFI020
LDC I,1
EQU I
FJP L60
LOD I,2,52
LOC 900
LDC I,4
ADI
STR I,2,52
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,12
CHK A,0,0
INC A,4
PAR A
LOC 910
CUP P,4,OUT$T184
LOD A,2,12
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,12
L60 LAB
UJP L53
L50 DEF 0
L51 DEF 4
L52 LAB
UJP L54
UJP L55
UJP L58
LOC 920
UJP L55
UJP L55
L53 LAB
LOD A,2,16
CHK A,-1,0
STR A,2,20
LOD I,1,312
LOD I,2,52
EQU I
NOT
FJP L61
LOC 930
MST 2,4,4
LCA 'GEN_SEGME003'
PAR A
CUP P,2,ASSER003
L61 LAB
UJP L48
L49 LAB
LOD A,1,344
CHK A,-1,0
STR A,2,24
L62 LAB
LOD A,2,24
LDC N
LOC 940
NEQ A
FJP L63
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
CUP P,4,OUT$T184
LOC 950
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L62
L63 LAB
LOD A,1,400
CHK A,-1,0
STR A,2,24
L64 LAB
LOD A,2,24
LOC 960
LDC N
NEQ A
FJP L65
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,24
CHK A,0,0
INC A,4
PAR A
LOC 970
CUP P,4,OUT$T184
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L64
L65 LAB
LOD A,1,388
CHK A,-1,0
STR A,2,24
L66 LAB
LOC 980
LOD A,2,24
LDC N
NEQ A
FJP L67
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,24
CHK A,0,0
INC A,4
LOC 990
PAR A
CUP P,4,OUT$T184
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L66
L67 LAB
LOD A,1,364
CHK A,-1,0
LOC 1000
STR A,2,24
L68 LAB
LOD A,2,24
LDC N
NEQ A
FJP L69
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,24
CHK A,0,0
LOC 1010
INC A,4
PAR A
CUP P,4,OUT$T184
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L68
L69 LAB
LOD I,1,312
LOC 1020
LOD I,2,56
EQU I
NOT
FJP L70
MST 2,4,4
LCA 'GEN_SEGME004'
PAR A
CUP P,2,ASSER003
L70 LAB
LOD A,1,376
CHK A,-1,0
LOC 1030
STR A,2,24
L71 LAB
LOD A,2,24
LDC N
NEQ A
FJP L72
MST 3,8,8
LDA 1,312
PAR A
LOD A,2,24
CHK A,0,0
LOC 1040
INC A,4
PAR A
CUP P,4,OUT$T184
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L71
L72 LAB
LOD I,1,312
LOC 1050
LOD I,2,48
EQU I
NOT
FJP L73
MST 2,4,4
LCA 'GEN_SEGME005'
PAR A
CUP P,2,ASSER003
L73 LAB
MST 3,0,0
CUP P,0,CLOSE183
LOC 1060
MST 3,0,0
CUP P,0,OPEN$191
LDC I,1
STR I,2,64
LOD A,1,496
CHK A,-1,0
STR A,2,44
L74 LAB
LOD A,2,44
LDC N
NEQ A
LOC 1070
FJP L75
MST 3,12,12
LOD A,2,44
CHK A,0,0
PAR A
LDC I,0
CHK I,0,3
PAR I
LOD I,2,64
CHK I,1,1000
LOC 1080
PAR I
CUP P,6,OUT$E193
LOD I,2,64
LDC I,1
ADI
STR I,2,64
LOD A,2,44
CHK A,0,0
IND A,20
CHK A,-1,0
LOC 1090
STR A,2,44
UJP L74
L75 LAB
MST 3,0,0
CUP P,0,CLOSE192
MST 3,0,0
CUP P,0,OPEN$194
LDC I,1
STR I,2,64
LOD A,1,496
CHK A,-1,0
LOC 1100
STR A,2,44
L76 LAB
LOD A,2,44
LDC N
NEQ A
FJP L77
LOD A,2,44
CHK A,0,0
IND A,16
CHK A,-1,0
STR A,2,24
L78 LAB
LOC 1110
LOD A,2,24
LDC N
NEQ A
FJP L79
MST 2,12,12
LOD A,2,24
CHK A,0,0
IND A,4
CHK A,0,0
INC A,4
LOC 1120
PAR A
LDC I,6
CHK I,0,35
PAR I
LDC I,30
CHK I,1,36
PAR I
CUP I,6,GETSI021
NGI
LOD I,1,4860
LOC 1130
ADI
LDC I,4
ADI
CHK I,0,1073741823
STR I,2,152
MST 3,24,24
LOD A,2,44
CHK A,0,0
PAR A
LDC I,1
LOC 1140
CHK I,0,2
PAR I
LDC I,0
CHK I,0,1
PAR I
LDC I,1
CHK I,1,1000
PAR I
LOD I,2,152
CHK I,0,1073741823
LOC 1150
PAR I
LOD I,2,64
CHK I,1,1000
PAR I
CUP P,12,OUT$R196
MST 3,24,24
LDA 1,5036
PAR A
LDC I,0
CHK I,0,2
LOC 1160
PAR I
LDC I,1
CHK I,0,1
PAR I
LDC I,1
CHK I,1,1000
PAR I
LOD I,2,152
CHK I,0,1073741823
PAR I
LOC 1170
LDC I,1
CHK I,1,1000
PAR I
CUP P,12,OUT$R196
LOD A,2,24
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,24
UJP L78
L79 LAB
LOC 1180
LOD I,2,64
LDC I,1
ADI
STR I,2,64
LOD A,2,44
CHK A,0,0
IND A,20
CHK A,-1,0
STR A,2,44
UJP L76
L77 LAB
LOC 1190
MST 3,0,0
CUP P,0,CLOSE195
MST 3,0,0
CUP P,0,CLOSE180
LDC N
CHK A,-1,0
STR A,1,288
LDC N
CHK A,-1,0
STR A,1,328
LOC 1200
LDC I,1
LDC I,1
SBI
CHK I,-1,30
STR I,1,39472
LDC I,0
CHK I,0,15
STR I,1,39924
LOD A,1,5052
RST
LOC 1210
RET P
L1 DEF 160
SST P SAVE$197 2 0 0 116 0
LOC 0
SAVE$197 ENT P,2,L1 SAVE_PARMREG 1 1 1
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
STR A,2,124
LOD A,2,124
IND I,28
LDC I,4
DVI
LOC 10
LDC I,1
SBI
CHK I,-1,9
STR I,2,8
LOD I,2,8
LDC I,0
GEQ I
FJP L2
MST 2,12,12
LDA 2,68
LOC 20
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,2,124
IND I,24
LOD A,2,124
IND I,40
ADI
LOD A,2,124
LOC 30
IND I,44
ADI
NGI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,8,8
LDA 2,12
PAR A
LDA 1,35532
LOC 40
LDC I,0
CHK J,0,9
IXA 4
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 1,31380
LOD I,2,8
LOC 50
LDC I,1
ADI
CHK J,1,32
DEC I,1
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 2,68
PAR A
LOC 60
LDA 2,12
PAR A
CUP P,6,EMITX077
L2 LAB
RET P
L1 DEF 128
SST P RESTO198 2 0 0 116 0
LOC 0
RESTO198 ENT P,2,L1 RESTORE_PARM 1 1 1
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
STR A,2,124
LOD A,2,124
IND I,28
LDC I,4
DVI
LOC 10
LDC I,1
SBI
CHK I,-1,9
STR I,2,8
LOD I,2,8
LDC I,0
GEQ I
FJP L2
MST 2,8,8
LDA 2,68
LOC 20
PAR A
LDA 1,35532
LDC I,0
CHK J,0,9
IXA 4
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOC 30
LDA 2,12
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,2,124
IND I,24
LOD A,2,124
IND I,40
ADI
LOC 40
LOD A,2,124
IND I,44
ADI
NGI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,12,12
LDA 1,31380
LOD I,2,8
LOC 50
LDC I,1
ADI
CHK J,1,32
DEC I,1
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 2,68
PAR A
LOC 60
LDA 2,12
PAR A
CUP P,6,EMITX077
L2 LAB
RET P
L1 DEF 128
SST P CALLS199 2 0 0 316 0
SST P GENCA200 3 4 0 124 4
LOC 0
GENCA200 ENT P,3,L1 GENCALL 1 1 1
MST 2,8,8
LDA 3,80
PAR A
LDA 1,35500
LDC I,2
CHK J,1,8
DEC I,1
IXA 4
IND I,0
LOC 10
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 3,24
PAR A
LDC I,3
CHK I,0,31
PAR I
LOD I,1,4860
LOC 20
CHK I,0,1073741823
PAR I
CUP P,6,EXT$R074
LDC I,4
CHK I,0,5
STR I,3,72
LDA 3,12
LCA '$PCSP '
MOV 8
LDC I,8
LOC 30
CHK I,1,8
STR I,3,20
LDA 3,12
LDC I,6
CHK J,1,8
DEC I,1
IXA 1
LDA 1,100
LDC I,1
CHK J,1,8
LOC 40
DEC I,1
IXA 1
IND C,0
CHK I,0,255
STO C
LDA 3,12
LDC I,7
CHK J,1,8
DEC I,1
IXA 1
LOC 50
LDA 1,100
LDC I,2
CHK J,1,8
DEC I,1
IXA 1
IND C,0
CHK I,0,255
STO C
LDA 3,12
LDC I,8
LOC 60
CHK J,1,8
DEC I,1
IXA 1
LDA 1,100
LDC I,3
CHK J,1,8
DEC I,1
IXA 1
IND C,0
CHK I,0,255
LOC 70
STO C
MST 2,8,8
LDA 3,76
PAR A
LDA 3,12
PAR A
CUP P,4,UPD$P132
MST 2,8,8
LOD I,3,8
CHK I,-1,30
LOC 80
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,LOADS119
MST 2,20,20
LDC I,65
CHK I,0,285
PAR I
LDC I,0
LOC 90
CHK I,0,1
PAR I
LDA 3,80
PAR A
LDA 3,24
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
LOC 100
RET P
L1 DEF 136
SST P ONE$A201 3 8 0 0 8
LOC 0
ONE$A201 ENT P,3,L1 ONE_ARG 1 1 1
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
LOD I,1,35492
LOD I,3,8
NEQ I
LOC 10
AND
FJP L2
MST 2,0,0
CUP P,0,MOVE$085
L2 LAB
MST 2,12,12
LDA 1,4748
PAR A
LOD I,3,8
CHK I,-1,30
PAR I
LOC 20
LOD I,3,12
CHK I,0,15
PAR I
CUP P,6,COERC140
MST 2,4,4
LOD I,3,8
CHK I,-1,30
PAR I
CUP P,2,FREED090
RET P
L1 DEF 16
SST P TWO$S202 3 16 0 56 16
LOC 0
TWO$S202 ENT P,3,L1 TWO_SINGLE_A 1 1 1
LDA 1,30932
LOD I,3,16
CHK J,0,15
IXA 1
IND B,0
NOT
LDA 1,30932
LOD I,3,20
CHK J,0,15
LOC 10
IXA 1
IND B,0
NOT
AND
NOT
FJP L2
MST 2,4,4
LCA 'TWO_SINGL001'
PAR A
CUP P,2,ASSER003
L2 LAB
LOC 20
MST 2,8,8
LOD I,3,8
CHK I,-1,30
PAR I
LOD I,3,16
CHK I,0,15
PAR I
CUP P,4,COERC114
LDA 1,35308
LDC I,6
LOC 30
CHK J,0,31
IXA 1
IND B,0
NOT
LOD I,1,35492
LOD I,3,8
EQU I
LOD I,1,35492
LOD I,3,12
EQU I
LOC 40
IOR
NOT
AND
FJP L3
MST 2,0,0
CUP P,0,MOVE$085
L3 LAB
MST 2,8,8
LDA 3,24
PAR A
LDC I,6
LOC 50
INC I,1
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 3,24
PAR A
LOD I,3,12
CHK I,-1,30
PAR I
LOC 60
LOD I,3,20
CHK I,0,15
PAR I
CUP P,6,COERC140
MST 2,8,8
LDA 1,4748
PAR A
LOD I,3,8
CHK I,-1,30
PAR I
LOC 70
CUP P,4,MOVE$110
MST 2,4,4
LOD I,3,8
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,4,4
LOD I,3,12
CHK I,-1,30
PAR I
LOC 80
CUP P,2,FREED090
RET P
L1 DEF 80
SST P CHECK203 3 4 0 0 4
LOC 0
CHECK203 ENT P,3,L1 CHECKFILADR 1 1 1
LDA 1,35760
LOD I,3,8
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,2
NEQ I
FJP L2
LOC 10
MST 2,4,4
LDC I,14
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L3
L2 LAB
MST 2,4,4
LOD I,3,8
CHK I,-1,30
PAR I
LOC 20
CUP B,2,DATUM118
NOT
FJP L4
MST 2,4,4
LDC I,57
CHK I,0,68
PAR I
CUP P,2,ERROR005
L4 LAB
L3 LAB
RET P
L1 DEF 12
SST P ALLOC204 3 4 0 56 4
LOC 0
ALLOC204 ENT P,3,L1 ALLOC_EXCESS 1 1 1
MST 2,8,8
LDA 3,12
PAR A
LOD I,3,8
LDC I,4
MPI
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LOC 10
LDC I,10
CHK I,0,285
PAR I
LDA 1,4804
PAR A
LDA 3,12
PAR A
CUP P,6,EMITX077
RET P
L1 DEF 68
SST P EXCES205 3 16 0 56 16
LOC 0
EXCES205 ENT P,3,L1 EXCESS_ARG 1 1 1
MST 2,12,12
LDA 3,24
PAR A
LDC I,30
CHK I,0,31
PAR I
LOD I,3,12
LOD I,3,8
SBI
LOC 10
LDC I,1
ADI
LDC I,4
MPI
NGI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,12,12
LDA 3,24
LOC 20
PAR A
LOD I,3,16
CHK I,-1,30
PAR I
LOD I,3,20
CHK I,0,15
PAR I
CUP P,6,COERC140
MST 2,4,4
LOD I,3,16
LOC 30
CHK I,-1,30
PAR I
CUP P,2,FREED090
RET P
L1 DEF 80
SST P DEALL206 3 4 0 56 4
LOC 0
DEALL206 ENT P,3,L1 DEALLOC_EXCE 1 1 1
MST 2,8,8
LDA 3,12
PAR A
LOD I,3,8
LDC I,4
MPI
PAR I
CUP P,4,IMM$O064
MST 2,16,16
LOC 10
LDC I,265
CHK I,0,285
PAR I
LDC I,0
CHK I,0,3
PAR I
LDA 1,4804
PAR A
LDA 3,12
PAR A
LOC 20
CUP P,8,EMITT106
RET P
L1 DEF 68
SST P CHECK207 3 4 0 4 4
LOC 0
CHECK207 ENT P,3,L1 CHECK_REF_PA 1 1 1
LDA 1,35760
LOD I,3,8
CHK J,-1,30
INC I,1
IXA 116
STR A,3,16
LDA 1,39928
LOD I,1,5032
CHK J,0,8
LOC 10
IXA 48
STR A,3,20
LOD A,3,16
IND I,4
LDC I,2
EQU I
NOT
FJP L2
MST 2,4,4
LCA 'CHECK_REF001'
LOC 20
PAR A
CUP P,2,ASSER003
L2 LAB
LOD A,3,20
IND I,32
LOD A,3,20
IND I,16
SBI
STR I,3,12
LOD A,3,16
IND I,72
LOC 30
LDC I,0
EQU I
LOD A,3,16
IND I,60
LDC I,1
EQU I
AND
LOD A,3,16
IND I,68
LOD I,1,5032
LOC 40
EQU I
AND
LOD I,3,12
LOD A,3,16
IND I,64
LEQ I
AND
LOD A,3,16
IND I,64
LOD I,3,12
LOC 50
LOD A,3,20
IND I,28
ADI
LES I
AND
FJP L3
LDC B,1
STR B,2,312
LOD A,3,16
IND I,64
LOC 60
STR I,2,320
LDA 1,35532
LOD A,3,16
IND I,64
LOD I,3,12
SBI
LDC I,4
DVI
CHK J,0,9
IXA 4
LOC 70
IND I,0
CHK I,0,31
STR I,2,316
UJP L4
L3 LAB
LDC B,0
STR B,2,312
L4 LAB
RET P
L1 DEF 24
SST P RESUL208 3 4 0 112 4
LOC 0
RESUL208 ENT P,3,L1 RESULT_PARM 1 1 1
LOD B,2,312
NOT
FJP L2
MST 2,4,4
LCA 'RESLT_PRM001'
PAR A
CUP P,2,ASSER003
L2 LAB
MST 2,8,8
LDA 3,68
LOC 10
PAR A
LOD I,2,316
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 3,12
PAR A
LOD I,1,5048
CHK I,0,31
LOC 20
PAR I
LOD I,2,320
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,12,12
LDA 1,31060
LOD I,3,8
CHK J,0,15
IXA 4
LOC 30
IND I,0
CHK I,0,285
PAR I
LDA 3,68
PAR A
LDA 3,12
PAR A
CUP P,6,EMITX077
RET P
L1 DEF 124
LOC 0
CALLS199 ENT P,2,L1 CALLSTANDARD 1 1 1
MST 2,4,4
LDA 1,100
PAR A
CUP I,2,NAME$037
CHK I,0,31
STR I,2,288
LOD I,2,288
ORD
CHK I,0,31
LOC 10
XJP L2
L6 LAB
LOD I,2,288
LDC I,1
EQU I
FJP L7
MST 3,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
LOC 20
CHK I,0,15
PAR I
CUP P,4,ONE$A201
UJP L8
L7 LAB
MST 3,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,13
CHK I,0,15
LOC 30
PAR I
CUP P,4,ONE$A201
L8 LAB
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
LOC 40
PAR I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
PAR A
LDA 1,35760
LOC 50
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK I,0,15
PAR I
LDC I,6
CHK I,0,31
PAR I
LOC 60
CUP P,8,REG$D113
LOD I,2,288
LDC I,1
EQU I
FJP L9
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,ALLOC080
LOC 70
UJP L10
L9 LAB
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,ALLOC081
L10 LAB
LOD I,1,39472
CHK I,-1,30
STR I,1,35492
LDA 1,30932
LOC 80
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
IXA 1
IND B,0
STR B,1,35496
LOC 90
UJP L5
L11 LAB
MST 3,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
CHK I,0,15
PAR I
CUP P,4,ONE$A201
MST 3,4,4
LOC 100
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L12 LAB
MST 2,0,0
CUP P,0,SAVE$197
MST 3,16,16
LOC 110
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
CHK I,0,15
LOC 120
PAR I
LDC I,2
CHK I,0,15
PAR I
CUP P,8,TWO$S202
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 130
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,RESTO198
UJP L5
L13 LAB
MST 3,4,4
LOC 140
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,GENCA200
UJP L5
L14 LAB
LOC 150
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
LOC 160
PAR I
CUP P,2,CHECK207
MST 3,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,2
CHK I,0,15
PAR I
CUP P,4,ONE$A201
LOC 170
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
LOD B,2,312
FJP L15
MST 3,4,4
LOC 180
LDC I,5
CHK I,0,15
PAR I
CUP P,2,RESUL208
L15 LAB
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L16 LAB
MST 3,4,4
LOD I,1,39472
LDC I,1
LOC 190
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,CHECK207
MST 3,8,8
LOC 200
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,2
CHK I,0,15
PAR I
CUP P,4,ONE$A201
MST 3,4,4
LOD I,1,39472
LDC I,1
LOC 210
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
LOD B,2,312
FJP L17
MST 3,4,4
LDC I,6
CHK I,0,15
PAR I
LOC 220
CUP P,2,RESUL208
L17 LAB
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L18 LAB
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 230
CUP P,2,CHECK203
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,CHECK207
MST 3,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 240
LDC I,2
CHK I,0,15
PAR I
CUP P,4,ONE$A201
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 250
CUP P,2,GENCA200
LOD B,2,312
FJP L19
MST 3,4,4
LDC I,10
CHK I,0,15
PAR I
CUP P,2,RESUL208
L19 LAB
MST 2,0,0
CUP P,0,POPTO129
LOC 260
UJP L5
L20 LAB
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,4,4
LOD I,1,39472
LOC 270
CHK I,-1,30
PAR I
CUP P,2,CHECK207
MST 3,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,2
CHK I,0,15
PAR I
LOC 280
CUP P,4,ONE$A201
MST 3,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
LOD B,2,312
FJP L21
LOC 290
MST 3,4,4
LDC I,13
CHK I,0,15
PAR I
CUP P,2,RESUL208
L21 LAB
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L22 LAB
MST 3,4,4
LOD I,1,39472
LOC 300
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,16,16
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 310
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,2
CHK I,0,15
PAR I
LDC I,10
CHK I,0,15
PAR I
LOC 320
CUP P,8,TWO$S202
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,POPTO129
LOC 330
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L23 LAB
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
LOC 340
MST 3,16,16
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,5
LOC 350
CHK I,0,15
PAR I
LDC I,10
CHK I,0,15
PAR I
CUP P,8,TWO$S202
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
LOC 360
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L24 LAB
MST 3,4,4
LOD I,1,39472
LOC 370
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,16,16
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 380
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,6
CHK I,0,15
PAR I
LDC I,10
CHK I,0,15
PAR I
LOC 390
CUP P,8,TWO$S202
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,POPTO129
LOC 400
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L25 LAB
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
LOC 410
MST 3,16,16
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
LOC 420
CHK I,0,15
PAR I
LDC I,10
CHK I,0,15
PAR I
CUP P,8,TWO$S202
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
LOC 430
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L26 LAB
MST 2,0,0
CUP P,0,POPTO129
LOC 440
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,4,4
LDC I,1
PAR I
LOC 450
CUP P,2,ALLOC204
MST 3,16,16
LDC I,1
PAR I
LDC I,1
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
LOC 460
CHK I,0,15
PAR I
CUP P,8,EXCES205
MST 3,8,8
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LDC I,13
LOC 470
CHK I,0,15
PAR I
CUP P,4,ONE$A201
MST 3,4,4
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
LOC 480
MST 3,4,4
LDC I,1
PAR I
CUP P,2,DEALL206
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L27 LAB
MST 3,4,4
LOC 490
LOD I,1,39472
LDC I,3
SBI
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 3,4,4
LDC I,1
PAR I
CUP P,2,ALLOC204
LOC 500
MST 3,16,16
LDC I,1
PAR I
LDC I,1
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
CHK I,0,15
LOC 510
PAR I
CUP P,8,EXCES205
MST 3,16,16
LOD I,1,39472
LDC I,2
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
LDC I,1
LOC 520
SBI
CHK I,-1,30
PAR I
LDC I,2
CHK I,0,15
PAR I
LDC I,10
CHK I,0,15
PAR I
CUP P,8,TWO$S202
LOC 530
MST 3,4,4
LOD I,1,39472
LDC I,3
SBI
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 3,4,4
LDC I,1
PAR I
LOC 540
CUP P,2,DEALL206
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,POPTO129
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L28 LAB
MST 3,4,4
LOD I,1,39472
LOC 550
CHK I,-1,30
PAR I
CUP P,2,CHECK203
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L29
LOC 560
MST 2,0,0
CUP P,0,MOVE$085
L29 LAB
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,GENCA200
MST 2,0,0
CUP P,0,PUSHT128
LDA 1,35308
LOC 570
LDC I,6
CHK J,0,31
IXA 1
IND B,0
LOD I,1,35492
LOD I,1,39472
LDC I,1
SBI
NEQ I
IOR
LOC 580
NOT
FJP L30
MST 2,4,4
LCA 'QELN,QEOF001'
PAR A
CUP P,2,ASSER003
L30 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 590
IXA 116
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
MOV 116
MST 2,16,16
LOC 600
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 610
INC I,1
IXA 116
IND A,0
CHK A,-1,0
PAR A
LDC I,5
CHK I,0,15
PAR I
LDC I,6
CHK I,0,31
LOC 620
PAR I
CUP P,8,REG$D113
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,8
LOC 630
LDC I,0
CHK I,0,1
STO I
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,ALLOC080
LOD I,1,39472
LDC I,1
LOC 640
SBI
CHK I,-1,30
STR I,1,35492
LDC B,0
STR B,1,35496
UJP L5
L31 LAB
MST 2,12,12
LDA 2,176
PAR A
LDA 1,35500
LOC 650
LDC I,1
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
PAR I
LDC I,8
LDC I,172
SBI
LOC 660
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,2,324
LOD A,2,324
LOC 670
IND I,4
LDC I,2
NEQ I
FJP L32
MST 2,4,4
LDC I,58
CHK I,0,68
PAR I
CUP P,2,ERROR005
L32 LAB
MST 2,8,8
LOC 680
LDA 2,176
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 690
CUP P,2,FREED090
LOD A,2,324
IND A,0
CHK A,-1,0
STR A,2,292
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 700
LDA 1,4576
MOV 116
LOD A,2,324
LOD A,2,292
CHK A,-1,0
STO A
LOD A,2,324
INC A,4
LDC I,2
CHK I,0,15
LOC 710
STO I
LOD A,2,324
INC A,72
LDC I,1
CHK I,0,2
STO I
LOD A,2,324
INC A,84
LDC I,1
STO I
LOC 720
LOD A,2,324
INC A,92
LDC I,1
CHK I,0,8
STO I
LOD A,2,324
INC A,88
LDC I,8
LDC I,172
SBI
LOC 730
STO I
UJP L5
L33 LAB
MST 3,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,CHECK203
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L34 LAB
LOC 740
LDA 1,30964
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
IXA 1
IND B,0
LOC 750
NOT
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,2
LOC 760
NEQ I
IOR
FJP L35
MST 2,4,4
LDC I,43
CHK I,0,68
PAR I
CUP P,2,ERROR005
L35 LAB
MST 2,8,8
LOD I,1,39472
LOC 770
CHK I,-1,30
PAR I
LDC I,10
CHK I,0,15
PAR I
CUP P,4,COERC114
MST 2,8,8
LDA 2,120
PAR A
LOD I,1,39472
LOC 780
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L36
LDA 1,35760
LOC 790
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,4
MOD
LDC I,0
NEQ I
FJP L37
LOC 800
MST 2,4,4
LDC I,3
CHK I,0,68
PAR I
CUP P,2,ERROR005
L37 LAB
UJP L38
L36 LAB
LOD B,1,305
FJP L39
MST 2,8,8
LDA 2,176
LOC 810
PAR A
LDC I,4
LDC I,1
SBI
PAR I
CUP P,4,IMM$O064
LOD A,1,328
CHK A,-1,0
STR A,2,300
MST 2,20,20
LOC 820
LDC I,195
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,176
PAR A
LDA 2,120
PAR A
LOC 830
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,8,8
LDA 2,64
PAR A
LDC I,1
PAR I
CUP P,4,IMM$O064
LOC 840
MST 2,8,8
LDA 2,8
PAR A
LDC I,1
NGI
PAR I
CUP P,4,IMM$O064
MST 2,20,20
LDC I,61
CHK I,0,285
LOC 850
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
PAR A
LDA 1,4400
PAR A
LOD A,1,328
CHK A,-1,0
LOC 860
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,300
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
L39 LAB
L38 LAB
LOC 870
MST 2,8,8
LDA 2,232
PAR A
LDC I,31
DEC I,1
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDC I,11
LOC 880
CHK I,0,285
PAR I
LDA 2,232
PAR A
LDA 2,120
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,176
PAR A
LOC 890
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,8,8
LDA 2,232
PAR A
LDC I,31
LOC 900
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,176
PAR A
LDA 2,232
LOC 910
PAR A
CUP P,6,EMITX077
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
MST 2,4,4
LOC 920
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L40 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 930
INC I,1
IXA 116
IND I,4
LDC I,2
NEQ I
FJP L41
MST 2,4,4
LDC I,54
CHK I,0,68
PAR I
LOC 940
CUP P,2,ERROR005
L41 LAB
MST 2,8,8
LDA 2,176
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,8,8
LDA 2,232
LOC 950
PAR A
LDC I,31
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,176
LOC 960
PAR A
LDA 2,232
PAR A
CUP P,6,EMITX077
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
LOC 970
CUP P,0,POPTO129
UJP L5
L42 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,2
NEQ I
LOC 980
FJP L43
MST 2,4,4
LDC I,53
CHK I,0,68
PAR I
CUP P,2,ERROR005
L43 LAB
LOD B,1,305
FJP L44
MST 2,8,8
LDA 2,120
LOC 990
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,176
PAR A
LDC I,124
CHK I,0,1073741823
LOC 1000
PAR I
CUP P,4,ADDR$075
LOD A,1,328
CHK A,-1,0
STR A,2,308
MST 2,20,20
LDC I,186
CHK I,0,285
PAR I
LDC I,0
LOC 1010
CHK I,-8,7
PAR I
LDA 2,120
PAR A
LDA 2,176
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
LOC 1020
MST 2,8,8
LDA 2,176
PAR A
LDC I,124
LDC I,4
ADI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
LOD A,1,328
LOC 1030
CHK A,-1,0
STR A,2,304
MST 2,20,20
LDC I,185
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,120
LOC 1040
PAR A
LDA 2,176
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,8,8
LOD A,2,308
CHK A,-1,0
LOC 1050
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
MST 2,20,20
LDC I,61
CHK I,0,285
PAR I
LDC I,0
LOC 1060
CHK I,0,1
PAR I
LDA 1,4512
PAR A
LDA 1,4400
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
LOC 1070
MST 2,8,8
LOD A,2,304
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
L44 LAB
MST 2,8,8
LDA 2,232
LOC 1080
PAR A
LDC I,31
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,232
PAR A
LOD I,1,39472
CHK I,-1,30
LOC 1090
PAR I
CUP P,4,MOVE$110
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L2 DEF 0
L3 DEF 31
L4 LAB
LOC 1100
UJP L6
UJP L6
UJP L6
UJP L33
UJP L28
UJP L28
UJP L6
UJP L13
UJP L6
UJP L34
LOC 1110
UJP L13
UJP L14
UJP L16
UJP L18
UJP L20
UJP L22
UJP L13
UJP L13
UJP L13
UJP L42
LOC 1120
UJP L40
UJP L6
UJP L31
UJP L6
UJP L12
UJP L13
UJP L23
UJP L24
UJP L25
UJP L26
LOC 1130
UJP L27
UJP L11
L5 LAB
LOD I,2,288
ORD
CHK S,0,63
LDC S,(0,0,32263,64640)
INN
LOD I,1,39472
LDC I,1
NEQ I
LOC 1140
AND
FJP L46
MST 2,4,4
LDC I,64
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L47
L46 LAB
LOD I,2,288
ORD
LOC 1150
CHK S,0,63
LDC S,(0,0,33048,512)
INN
LOD I,1,39472
LDC I,1
LDC I,1
SBI
NEQ I
AND
FJP L48
LOC 1160
MST 2,4,4
LDC I,63
CHK I,0,68
PAR I
CUP P,2,ERROR005
L48 LAB
L47 LAB
RET P
L1 DEF 328
SST P ASMNX209 2 0 0 556 0
SST P CASE1210 3 0 0 0 0
LOC 0
CASE1210 ENT P,3,L1 CASE1 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 10
STR A,3,8
LOD I,1,44
ORD
CHK S,0,63
LDC S,(0,32,0,1)
INN
FJP L7
LOD A,3,8
IND I,4
LDC I,11
LOC 20
NEQ I
FJP L8
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,10
CHK I,0,15
PAR I
CUP P,4,COERC114
LOC 30
UJP L9
L8 LAB
L9 LAB
UJP L10
L7 LAB
LDA 1,30980
LOD A,3,8
IND I,4
CHK J,0,15
IXA 1
IND B,0
NOT
FJP L11
LOC 40
MST 2,4,4
LDC I,0
CHK I,0,68
PAR I
CUP P,2,ERROR005
L11 LAB
L10 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
LOC 50
FJP L12
LDA 1,30964
LOD A,3,8
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L13
LOD I,1,44
LDC I,0
LOC 60
EQU I
FJP L14
LOD A,3,8
INC A,64
LOD A,3,8
IND I,64
ABI
STO I
UJP L15
L14 LAB
LOD A,3,8
LOC 70
INC A,64
LOD A,3,8
IND I,64
NGI
STO I
L15 LAB
UJP L16
L13 LAB
LOD I,1,44
LDC I,1
EQU I
FJP L17
LOC 80
LOD A,3,8
INC A,52
LOD A,3,8
IND R,52
ABR
STO R
UJP L18
L17 LAB
LOD A,3,8
INC A,52
LOD A,3,8
LOC 90
IND R,52
NGR
STO R
L18 LAB
L16 LAB
UJP L19
L12 LAB
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 100
CUP P,4,GET$O108
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
LDA 1,30932
LOD A,3,8
IND I,4
CHK J,0,15
LOC 110
IXA 1
IND B,0
FJP L20
MST 2,0,0
CUP P,0,FINDR083
UJP L21
L20 LAB
MST 2,0,0
CUP P,0,FINDR084
L21 LAB
MST 2,8,8
LDA 2,240
LOC 120
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOD I,1,44
ORD
CHK S,0,63
LDC S,(0,0,0,3)
INN
LOC 130
FJP L22
LDA 1,31124
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
STR I,2,12
UJP L23
L22 LAB
LOC 140
LDA 1,31188
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
STR I,2,12
L23 LAB
MST 2,12,12
LOD I,2,12
LOC 150
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
LOC 160
PAR I
LOD A,3,8
IND A,0
CHK A,-1,0
PAR A
LOD A,3,8
IND I,4
CHK I,0,15
PAR I
LOD I,1,35476
LOC 170
CHK I,0,31
PAR I
CUP P,8,REG$D113
L19 LAB
UJP L5
L24 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOC 180
LDA 1,33108
LOD A,3,8
IND I,4
CHK J,0,15
IXA 64
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
IND I,0
LOC 190
CHK I,0,15
STR I,2,352
LOD I,2,352
LDC I,0
EQU I
FJP L25
MST 2,4,4
LDC I,59
CHK I,0,68
PAR I
LOC 200
CUP P,2,ERROR005
UJP L26
L25 LAB
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,352
CHK I,0,15
PAR I
CUP P,4,COERC114
LOC 210
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L27
LDA 1,30964
LOD I,2,352
CHK J,0,15
IXA 1
LOC 220
IND B,0
FJP L28
LOD A,3,8
INC A,64
LOD A,3,8
IND I,64
SQI
STO I
UJP L29
L28 LAB
LOD A,3,8
LOC 230
INC A,52
LOD A,3,8
IND R,52
SQR
STO R
L29 LAB
UJP L30
L27 LAB
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
LOC 240
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOD I,2,352
LDC I,10
EQU I
FJP L31
LDC I,147
CHK I,0,285
STR I,2,12
LOC 250
UJP L32
L31 LAB
LOD I,2,352
LDC I,13
EQU I
FJP L33
LDC I,53
CHK I,0,285
STR I,2,12
UJP L34
L33 LAB
LOD I,2,352
LOC 260
LDC I,12
EQU I
FJP L35
LDC I,54
CHK I,0,285
STR I,2,12
UJP L36
L35 LAB
LOD I,2,352
LDC I,11
EQU I
LOC 270
FJP L37
LDC I,148
CHK I,0,285
STR I,2,12
UJP L38
L37 LAB
LDC B,0
NOT
FJP L39
MST 2,4,4
LCA 'PSQI,PSQR001'
LOC 280
PAR A
CUP P,2,ASSER003
L39 LAB
L38 LAB
L36 LAB
L34 LAB
L32 LAB
MST 2,32,32
LDA 2,444
PAR A
LOD I,2,12
CHK I,0,285
PAR I
LDA 2,184
PAR A
LOC 290
LDA 2,184
PAR A
LDA 1,30932
LOD I,2,352
CHK J,0,15
IXA 1
IND B,0
PAR B
LDA 1,30932
LOD A,3,8
LOC 300
IND I,4
CHK J,0,15
IXA 1
IND B,0
PAR B
LDA 1,30932
LOD A,3,8
IND I,4
CHK J,0,15
IXA 1
LOC 310
IND B,0
PAR B
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 320
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,3,8
IND A,0
LOC 330
CHK A,-1,0
PAR A
LOD I,2,352
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
L30 LAB
L26 LAB
UJP L5
L40 LAB
LOC 340
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD I,1,44
LDC I,43
EQU I
FJP L41
LOC 350
LOD A,3,8
IND I,4
CHK I,0,15
STR I,1,52
LDC I,1
NGI
STR I,1,72
UJP L42
L41 LAB
LOD I,1,44
LDC I,56
LOC 360
EQU I
FJP L43
LOD A,3,8
IND I,4
CHK I,0,15
STR I,1,52
LDC I,1
STR I,1,72
UJP L44
L43 LAB
LOD I,1,44
LOC 370
LDC I,9
EQU I
FJP L45
LOD I,1,72
NGI
STR I,1,72
L45 LAB
L44 LAB
L42 LAB
LOD A,3,8
IND I,4
LOD I,1,52
NEQ I
LOC 380
FJP L46
MST 2,4,4
LDC I,23
CHK I,0,68
PAR I
CUP P,2,ERROR005
L46 LAB
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 390
LOD I,1,72
PAR I
CUP P,4,INCRE121
UJP L5
L47 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOC 400
LOD A,3,8
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,3936)
INN
NOT
FJP L48
MST 2,4,4
LDC I,49
LOC 410
CHK I,0,68
PAR I
CUP P,2,ERROR005
L48 LAB
LOD A,3,8
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,96)
INN
FJP L49
LOC 420
LOD A,3,8
IND I,4
LDC I,5
EQU I
LOD A,3,8
IND I,8
LDC I,1
EQU I
AND
FJP L50
LOC 430
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,BJUMP120
L50 LAB
LOD A,3,8
INC A,4
LDC I,8
CHK I,0,15
STO I
L49 LAB
LOC 440
UJP L5
L51 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LDA 1,30964
LOD A,3,8
IND I,4
LOC 450
CHK J,0,15
IXA 1
IND B,0
NOT
FJP L52
MST 2,4,4
LDC I,8
CHK I,0,68
PAR I
CUP P,2,ERROR005
LOC 460
UJP L53
L52 LAB
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,8
CHK I,0,15
PAR I
CUP P,4,COERC114
LOD A,3,8
LOC 470
INC A,4
LDC I,6
CHK I,0,15
STO I
L53 LAB
UJP L5
L54 LAB
LOD I,1,44
LDC I,16
EQU I
FJP L55
LOD I,1,39472
LOC 480
LDC I,1
SBI
CHK I,-1,30
STR I,2,388
UJP L56
L55 LAB
LOD I,1,39472
CHK I,-1,30
STR I,2,388
L56 LAB
LOD I,2,388
LDC I,1
LOC 490
GEQ I
NOT
FJP L57
MST 2,4,4
LCA 'PFLO,PFLT001'
PAR A
CUP P,2,ASSER003
L57 LAB
LDA 1,35760
LOD I,2,388
CHK J,-1,30
LOC 500
INC I,1
IXA 116
STR A,3,8
LDA 1,31508
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
LOC 510
STR I,2,12
LOD I,2,12
LDC I,0
EQU I
FJP L58
MST 2,4,4
LDC I,17
CHK I,0,68
PAR I
CUP P,2,ERROR005
L58 LAB
LOC 520
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L59
LOD A,3,8
INC A,52
LOD A,3,8
IND I,64
LOC 530
FLT
STO R
LOD A,3,8
INC A,60
LDA 1,4692
MOV 12
LOD A,3,8
INC A,4
LDC I,13
CHK I,0,15
LOC 540
STO I
UJP L60
L59 LAB
MST 2,8,8
LDA 2,184
PAR A
LOD I,2,388
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,4,4
LOC 550
LOD I,2,388
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,FINDR083
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,35476
LOC 560
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOD I,2,12
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
LOC 570
PAR A
CUP P,6,EMITX077
MST 2,16,16
LOD I,2,388
CHK I,-1,30
PAR I
LOD A,3,8
IND A,0
CHK A,-1,0
PAR A
LOC 580
LDC I,13
CHK I,0,15
PAR I
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,8,REG$D113
L60 LAB
UJP L5
L61 LAB
LDA 1,35760
LOD I,1,39472
LOC 590
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LDA 1,31572
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
IND I,0
LOC 600
CHK I,0,285
STR I,2,12
LOD I,2,12
LDC I,0
EQU I
FJP L62
MST 2,4,4
LDC I,65
CHK I,0,68
PAR I
LOC 610
CUP P,2,ERROR005
L62 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L63
LOD A,3,8
INC A,60
LDA 1,4692
LOC 620
MOV 12
LOD A,3,8
INC A,64
LOD A,3,8
IND R,52
TRC
STO I
LOD A,3,8
INC A,52
LDC R,0.0
LOC 630
STO R
LOD A,3,8
INC A,4
LDC I,10
CHK I,0,15
STO I
UJP L64
L63 LAB
MST 2,8,8
LDA 2,184
PAR A
LOC 640
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
LOC 650
CUP P,0,FINDR084
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOD I,2,12
LOC 660
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
LOC 670
PAR I
LOD A,3,8
IND A,0
CHK A,-1,0
PAR A
LDC I,10
CHK I,0,15
PAR I
LOD I,1,35476
CHK I,0,31
LOC 680
PAR I
CUP P,8,REG$D113
L64 LAB
UJP L5
L2 DEF 0
L3 DEF 59
L4 LAB
UJP L6
UJP L6
UJP L5
UJP L5
UJP L5
UJP L5
UJP L51
LOC 690
UJP L5
UJP L5
UJP L40
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L54
LOC 700
UJP L54
UJP L40
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 710
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 720
UJP L6
UJP L6
UJP L5
UJP L5
UJP L47
UJP L5
UJP L40
UJP L5
UJP L5
UJP L5
LOC 730
UJP L5
UJP L5
UJP L24
UJP L24
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L40
LOC 740
UJP L5
UJP L5
UJP L61
L5 LAB
RET P
L1 DEF 12
SST P CASE2211 3 0 0 0 0
LOC 0
CASE2211 ENT P,3,L1 CASE2 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 10
STR A,3,8
LDA 1,30964
LOD A,3,8
IND I,4
CHK J,0,15
IXA 1
IND B,0
NOT
FJP L7
MST 2,4,4
LOC 20
LDC I,48
CHK I,0,68
PAR I
CUP P,2,ERROR005
L7 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L8
LOC 30
LOD A,3,8
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
INC A,8
LDC I,0
CHK I,0,1
STO I
LOC 40
LOD A,3,8
INC A,64
LOD A,3,8
IND I,64
ODD
ORD
STO I
UJP L9
L8 LAB
LOD A,3,8
IND A,0
LOC 50
CHK A,-1,0
STR A,2,356
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LOC 60
LDA 2,184
PAR A
LDC I,1
PAR I
CUP P,4,IMM$O064
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,1,39472
LOC 70
CHK I,-1,30
PAR I
CUP P,4,LOADS119
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
LOD I,1,35492
LOC 80
LOD I,1,39472
NEQ I
AND
FJP L10
MST 2,0,0
CUP P,0,MOVE$085
L10 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 90
CUP P,2,FREED090
LOD A,1,328
CHK A,-1,0
STR A,2,408
MST 2,20,20
LDA 1,30996
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
LOC 100
IND I,0
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LOC 110
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
LOC 120
PAR I
LDA 1,4512
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOC 130
LOD A,2,408
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 140
INC I,1
IXA 116
LDA 1,4576
MOV 116
LOD A,3,8
LOD A,2,356
CHK A,-1,0
STO A
LOD A,3,8
INC A,4
LOC 150
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
INC A,8
LDC I,1
CHK I,0,1
STO I
LOD A,3,8
INC A,72
LOC 160
LDC I,1
CHK I,0,2
STO I
MST 2,0,0
CUP P,0,FINDR084
LOD A,3,8
INC A,84
LDC I,0
STO I
LOD A,3,8
LOC 170
INC A,88
LOD I,1,35476
CHK I,0,31
STO I
LOD A,3,8
INC A,12
LDA 1,4736
MOV 12
LOD A,3,8
INC A,24
LOC 180
LDA 1,4736
MOV 12
LOD A,3,8
INC A,40
LDC B,1
STO B
LOD A,3,8
INC A,36
LOD A,2,408
CHK A,-1,0
LOC 190
STO A
L9 LAB
UJP L5
L11 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
IND I,4
LOC 200
LDC I,5
NEQ I
FJP L12
MST 2,4,4
LDC I,46
CHK I,0,68
PAR I
CUP P,2,ERROR005
L12 LAB
LOD A,3,8
IND A,0
LOC 210
CHK A,-1,0
STR A,2,356
LOD A,3,8
IND I,8
LDC I,1
EQU I
FJP L13
LDA 2,424
LOD A,3,8
INC A,12
LOC 220
MOV 12
LOD A,3,8
INC A,12
LOD A,3,8
INC A,24
MOV 12
LOD A,3,8
INC A,24
LDA 2,424
MOV 12
LOC 230
LOD A,3,8
INC A,40
LOD A,3,8
IND B,40
NOT
STO B
UJP L14
L13 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
LOC 240
PAR I
CUP B,2,IS$CO006
FJP L15
LOD A,3,8
INC A,64
LDC I,1
LOD A,3,8
IND I,64
SBI
STO I
LOC 250
UJP L16
L15 LAB
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
LOC 260
PAR A
LDC I,1
PAR I
CUP P,4,IMM$O064
MST 2,32,32
LDA 2,444
PAR A
LDC I,285
CHK I,0,285
PAR I
LOC 270
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOC 280
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
LOC 290
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,3,8
IND A,0
CHK A,-1,0
PAR A
LOC 300
LDC I,5
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOD A,3,8
INC A,8
LDC I,0
LOC 310
CHK I,0,1
STO I
L16 LAB
L14 LAB
UJP L5
L17 LAB
MST 2,4,4
LDA 1,30964
PAR A
CUP P,2,COERC115
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 320
INC I,1
IXA 116
IND I,4
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 330
IND I,4
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
ORD
CHK S,0,63
LOC 340
LDC S,(0,0,0,3072)
INN
AND
NOT
FJP L18
MST 2,4,4
LCA 'PADI 001'
PAR A
CUP P,2,ASSER003
L18 LAB
LDA 1,35760
LOC 350
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,10
EQU I
FJP L19
MST 2,0,0
CUP P,0,ADD$T143
LOC 360
UJP L20
L19 LAB
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOC 370
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,32,32
LDA 2,444
PAR A
LOC 380
LDC I,9
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC B,1
PAR B
LDC B,1
LOC 390
PAR B
LDC B,1
PAR B
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOC 400
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOC 410
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 420
INC I,1
IXA 116
STR A,3,8
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,3,8
IND A,0
CHK A,-1,0
LOC 430
PAR A
LDC I,11
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
L20 LAB
UJP L5
L21 LAB
MST 2,4,4
LOC 440
LDA 1,30964
PAR A
CUP P,2,COERC115
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 450
IND A,0
CHK A,-1,0
STR A,2,356
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,11
LOC 460
EQU I
FJP L22
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 470
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,32,32
LDA 2,444
LOC 480
PAR A
LDC I,267
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC B,1
PAR B
LOC 490
LDC B,1
PAR B
LDC B,1
PAR B
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
LOC 500
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
LOC 510
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
LOC 520
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
PAR A
LDC I,11
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
LOC 530
PAR I
CUP P,8,REG$D113
UJP L23
L22 LAB
LDC B,0
STR B,2,362
LDC B,0
STR B,2,361
L24 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 540
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 550
INC A,60
LDA 1,4692
EQU M,12
AND
FJP L25
LDC B,1
STR B,2,362
UJP L26
L25 LAB
MST 2,4,4
LOD I,1,39472
LOC 560
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 570
IND I,56
LDC I,0
EQU I
AND
FJP L27
LDC B,1
STR B,2,362
UJP L28
L27 LAB
LDC I,0
STR I,2,496
LOC 580
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
IND I,56
LOC 590
LDC I,0
EQU I
FJP L29
LOD A,3,8
IND I,64
STR I,2,496
LOD A,3,8
INC A,64
LDC I,0
STO I
L29 LAB
LOC 600
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
IND I,56
LDC I,0
EQU I
LOC 610
FJP L30
LOD I,2,496
LOD A,3,8
IND I,64
SBI
STR I,2,496
LOD A,3,8
INC A,64
LDC I,0
STO I
L30 LAB
LOC 620
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
LOC 630
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
EQU M,12
LOC 640
AND
FJP L31
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LOC 650
LOD I,2,496
STO I
LDC I,0
STR I,2,496
UJP L32
L31 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 660
IND I,72
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,60
LDA 1,4692
LOC 670
EQU M,12
AND
FJP L33
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LOD I,2,496
LOC 680
NGI
STO I
LDC I,0
STR I,2,496
L33 LAB
L32 LAB
MST 2,12,12
LDA 2,364
PAR A
LDA 2,240
PAR A
LOD I,1,39472
LOC 690
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
MST 2,12,12
LDA 2,363
PAR A
LDA 2,184
PAR A
LOC 700
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,364
NOT
LOD B,2,363
NOT
AND
FJP L34
LOC 710
LDC B,1
STR B,2,361
UJP L35
L34 LAB
LOD B,2,364
NOT
FJP L36
LOD I,1,39472
CHK I,-1,30
STR I,2,380
LOD I,1,39472
LOC 720
LDC I,1
SBI
CHK I,-1,30
STR I,2,376
LOD I,2,496
NGI
STR I,2,496
UJP L37
L36 LAB
LOD B,2,363
NOT
LOC 730
FJP L38
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,2,380
LOD I,1,39472
CHK I,-1,30
STR I,2,376
UJP L39
L38 LAB
LOC 740
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,2,380
LOD I,1,39472
CHK I,-1,30
STR I,2,376
L39 LAB
L37 LAB
LOD I,2,496
LDC I,0
LOC 750
NEQ I
FJP L40
LDA 1,35760
LOD I,2,380
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LOC 760
FJP L41
LDA 1,35760
LOD I,2,380
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,0
EQU I
NOT
LOC 770
FJP L42
MST 2,4,4
LCA 'PSBI 001'
PAR A
CUP P,2,ASSER003
L42 LAB
LDA 1,35760
LOD I,2,380
CHK J,-1,30
INC I,1
IXA 116
LOC 780
INC A,64
LOD I,2,496
STO I
UJP L43
L41 LAB
LDA 1,35760
LOD I,2,376
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LOC 790
LDC I,0
EQU I
LDA 1,35760
LOD I,2,376
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,0
EQU I
LOC 800
AND
NOT
FJP L44
MST 2,4,4
LCA 'PSBI 002'
PAR A
CUP P,2,ASSER003
L44 LAB
LDA 1,35760
LOD I,2,376
CHK J,-1,30
LOC 810
INC I,1
IXA 116
INC A,64
LOD I,2,496
STO I
L43 LAB
L40 LAB
MST 2,4,4
LOD I,2,380
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
L35 LAB
L28 LAB
L26 LAB
LOC 820
LOD B,2,362
LOD B,2,361
IOR
FJP L24
LOD B,2,362
FJP L45
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 830
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 840
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
SBI
STO I
LOC 850
MST 2,0,0
CUP P,0,POPTO129
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOD A,2,356
CHK A,-1,0
STO A
LOC 860
UJP L46
L45 LAB
MST 2,20,20
LDA 2,444
PAR A
LDC I,265
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
LOC 870
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,10,ADD$S112
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
LOC 880
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
LOC 890
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
LOC 900
CHK A,-1,0
PAR A
LDC I,10
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
LDA 1,35760
LOC 910
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LOD I,2,496
STO I
L46 LAB
L23 LAB
UJP L5
L2 DEF 2
L3 DEF 47
L4 LAB
UJP L17
UJP L5
LOC 920
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 930
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 940
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 950
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L11
UJP L6
UJP L5
UJP L5
UJP L5
LOC 960
UJP L5
UJP L5
UJP L5
UJP L21
L5 LAB
RET P
L1 DEF 12
SST P CASE3212 3 0 0 0 0
LOC 0
CASE3212 ENT P,3,L1 CASE3 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
MST 2,4,4
LDA 1,30964
PAR A
CUP P,2,COERC115
LDA 1,35760
LOC 10
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
STR A,2,356
LDA 1,35760
LOC 20
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,11
EQU I
FJP L7
MST 2,8,8
LDA 2,240
LOC 30
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOC 40
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,32,32
LDA 2,444
PAR A
LDC I,148
CHK I,0,285
PAR I
LOC 50
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC B,1
PAR B
LDC B,1
PAR B
LDC B,1
PAR B
LOC 60
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 70
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 80
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
LOC 90
PAR A
LDC I,11
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
UJP L8
L7 LAB
LDC B,0
LOC 100
STR B,2,362
LDC B,0
STR B,2,361
L9 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L10
MST 2,4,4
LOC 110
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L11
LDC B,1
STR B,2,362
UJP L12
L11 LAB
LOC 120
MST 2,4,4
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
PAR I
CUP I,2,POWER031
STR I,2,500
LOC 130
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD I,2,500
LDC I,0
LOC 140
GEQ I
LOD A,3,8
IND I,68
LDC I,0
EQU I
AND
LOD A,3,8
IND I,56
LDC I,0
EQU I
LOC 150
AND
LOD A,3,8
IND I,72
LDC I,0
EQU I
LOD A,3,8
IND I,72
LDC I,1
EQU I
LOD A,3,8
LOC 160
IND I,76
LOD I,2,500
ADI
LDC I,3
LEQ I
AND
IOR
AND
FJP L13
LDC B,1
LOC 170
STR B,2,362
L13 LAB
L12 LAB
UJP L14
L10 LAB
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L15
LOC 180
MST 2,4,4
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
PAR I
LOC 190
CUP I,2,POWER031
STR I,2,500
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD I,2,500
LDC I,0
LOC 200
GEQ I
LOD A,3,8
IND I,68
LDC I,0
EQU I
AND
LOD A,3,8
IND I,56
LDC I,0
EQU I
LOC 210
AND
LOD A,3,8
IND I,72
LDC I,0
EQU I
LOD A,3,8
IND I,72
LDC I,1
EQU I
LOD A,3,8
LOC 220
IND I,76
LOD I,2,500
ADI
LDC I,3
LEQ I
AND
IOR
AND
FJP L16
LDC B,1
LOC 230
STR B,2,362
L16 LAB
L15 LAB
L14 LAB
LOD B,2,362
NOT
FJP L17
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 240
CUP B,2,IS$CO006
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO127
AND
FJP L18
LDA 1,35760
LOD I,1,39472
LOC 250
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 260
IXA 116
IND I,64
MPI
STR I,2,496
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LOC 270
LDC I,0
STO I
MST 2,8,8
LDA 2,240
PAR A
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 280
INC I,1
IXA 116
IND I,64
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDA 2,363
PAR A
LDA 2,184
PAR A
LOC 290
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,363
NOT
NOT
FJP L19
MST 2,4,4
LCA 'PMPI 001'
LOC 300
PAR A
CUP P,2,ASSER003
L19 LAB
LDC B,1
STR B,2,361
UJP L20
L18 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
LOC 310
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO127
AND
FJP L21
LDA 1,35760
LOC 320
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 330
INC I,1
IXA 116
IND I,64
MPI
STR I,2,496
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 340
INC I,1
IXA 116
INC A,64
LDC I,0
STO I
MST 2,12,12
LDA 2,364
PAR A
LDA 2,240
PAR A
LOC 350
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,364
NOT
NOT
FJP L22
LOC 360
MST 2,4,4
LCA 'PMPI 002'
PAR A
CUP P,2,ASSER003
L22 LAB
MST 2,8,8
LDA 2,184
PAR A
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 370
INC I,1
IXA 116
IND I,64
PAR I
CUP P,4,IMM$O064
LDC B,1
STR B,2,361
UJP L23
L21 LAB
MST 2,12,12
LDA 2,364
LOC 380
PAR A
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
MST 2,12,12
LOC 390
LDA 2,363
PAR A
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,364
NOT
LOC 400
LOD B,2,363
NOT
AND
FJP L24
LDC I,0
STR I,2,496
LDC B,1
STR B,2,361
UJP L25
L24 LAB
LOD B,2,364
LOC 410
NOT
FJP L26
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
UJP L27
L26 LAB
LOD B,2,363
NOT
LOC 420
FJP L28
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
UJP L29
L28 LAB
MST 2,4,4
LOC 430
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
L29 LAB
L27 LAB
L25 LAB
L23 LAB
L20 LAB
L17 LAB
LOD B,2,362
LOD B,2,361
IOR
FJP L9
LOD B,2,361
FJP L30
LOC 440
MST 2,16,16
LDA 2,444
PAR A
LDA 2,240
PAR A
LDA 2,184
PAR A
LOD I,1,39472
LDC I,1
SBI
LOC 450
CHK I,-1,30
PAR I
CUP P,8,MULT$144
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
LOC 460
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
LOC 470
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
PAR A
LDC I,10
CHK I,0,15
LOC 480
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 490
INC A,64
LOD I,2,496
STO I
UJP L31
L30 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 500
IXA 116
INC A,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOC 510
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
MPI
STO I
LDA 1,35760
LOD I,1,39472
LOC 520
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
LDA 1,35760
LOD I,1,39472
LOC 530
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
NEQ I
AND
FJP L32
LDA 1,35760
LOD I,1,39472
LOC 540
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,72
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 550
IXA 116
IND I,72
CHK I,0,2
STO I
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 560
IXA 116
INC A,76
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,76
MOV 20
L32 LAB
LDA 1,35760
LOC 570
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
IND I,72
LDC I,1
LOC 580
LEQ I
NOT
FJP L33
MST 2,4,4
LCA 'PMPI 003'
PAR A
CUP P,2,ASSER003
L33 LAB
LOD A,3,8
IND I,72
LDC I,1
LOC 590
EQU I
FJP L34
LOD A,3,8
INC A,76
LOD A,3,8
IND I,76
LOD I,2,500
ADI
CHK I,0,3
STO I
L34 LAB
LOC 600
LOD A,3,8
LOD A,2,356
CHK A,-1,0
STO A
MST 2,0,0
CUP P,0,POPTO129
L31 LAB
L8 LAB
UJP L5
L35 LAB
MST 2,4,4
LDA 1,30964
PAR A
LOC 610
CUP P,2,COERC115
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
LOC 620
STR A,2,356
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK I,0,15
LOC 630
STR I,2,352
LDA 1,30932
LOD I,2,352
CHK J,0,15
IXA 1
IND B,0
STR B,2,360
MST 2,4,4
LOD I,1,39472
LDC I,1
LOC 640
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
AND
LOC 650
FJP L36
LOD I,2,352
LDC I,10
EQU I
NOT
FJP L37
MST 2,4,4
LCA 'PDVI,PMOD001'
PAR A
CUP P,2,ASSER003
L37 LAB
LOC 660
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,0
EQU I
FJP L38
MST 2,4,4
LOC 670
LDC I,25
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L39
L38 LAB
LOD I,1,44
LDC I,12
EQU I
FJP L40
LDA 1,35760
LOC 680
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 690
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 700
IND I,64
DVI
STO I
UJP L41
L40 LAB
LOD I,1,44
LDC I,32
EQU I
FJP L42
LDA 1,35760
LOD I,1,39472
LOC 710
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 720
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOC 730
MOD
STO I
UJP L43
L42 LAB
LDC B,0
NOT
FJP L44
MST 2,4,4
LCA 'PDVI,PMOD002'
PAR A
CUP P,2,ASSER003
L44 LAB
L43 LAB
L41 LAB
L39 LAB
LOC 740
MST 2,0,0
CUP P,0,POPTO129
UJP L45
L36 LAB
LOD I,1,44
LDC I,12
EQU I
FJP L46
LOD B,2,360
FJP L47
LDC I,158
LOC 750
CHK I,0,285
STR I,2,12
UJP L48
L47 LAB
LDC I,156
CHK I,0,285
STR I,2,12
L48 LAB
UJP L49
L46 LAB
LOD I,1,44
LDC I,32
EQU I
LOC 760
FJP L50
LOD B,2,360
FJP L51
LDC I,162
CHK I,0,285
STR I,2,12
UJP L52
L51 LAB
LDC I,160
CHK I,0,285
STR I,2,12
L52 LAB
LOC 770
UJP L53
L50 LAB
LDC B,0
NOT
FJP L54
MST 2,4,4
LCA 'PDVI,PMOD003'
PAR A
CUP P,2,ASSER003
L54 LAB
L53 LAB
L49 LAB
MST 2,8,8
LDA 2,240
LOC 780
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOC 790
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,32,32
LDA 2,444
PAR A
LOD I,2,12
CHK I,0,285
PAR I
LOC 800
LDA 2,240
PAR A
LDA 2,184
PAR A
LOD B,2,360
PAR B
LOD B,2,360
PAR B
LOD B,2,360
PAR B
LOC 810
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 820
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 830
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
LOC 840
PAR A
LOD I,2,352
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
L45 LAB
UJP L5
L2 DEF 12
L3 DEF 34
L4 LAB
UJP L35
LOC 850
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 860
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L35
LOC 870
UJP L5
UJP L6
L5 LAB
RET P
L1 DEF 12
SST P CASE4213 3 0 0 0 0
LOC 0
CASE4213 ENT P,3,L1 CASE4 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
MST 2,4,4
LDA 1,30980
PAR A
CUP P,2,COERC115
LDA 1,35760
LOC 10
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
STR A,2,356
LDA 1,35760
LOC 20
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK I,0,15
STR I,2,352
LDA 1,30932
LOC 30
LOD I,2,352
CHK J,0,15
IXA 1
IND B,0
STR B,2,360
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
LOC 40
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
AND
FJP L7
LOD I,2,352
LOC 50
LDC I,13
EQU I
NOT
FJP L8
MST 2,4,4
LCA 'PADR,PSBR001'
PAR A
CUP P,2,ASSER003
L8 LAB
LOD I,1,44
LDC I,63
LOC 60
EQU I
FJP L9
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,52
LOC 70
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND R,52
LDA 1,35760
LOD I,1,39472
LOC 80
CHK J,-1,30
INC I,1
IXA 116
IND R,52
ADR
STO R
UJP L10
L9 LAB
LOD I,1,44
LDC I,64
EQU I
LOC 90
FJP L11
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,52
LDA 1,35760
LOC 100
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND R,52
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 110
INC I,1
IXA 116
IND R,52
SBR
STO R
UJP L12
L11 LAB
LOD I,1,44
LDC I,65
EQU I
FJP L13
LOC 120
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,52
LDA 1,35760
LOD I,1,39472
LOC 130
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND R,52
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 140
IXA 116
IND R,52
MPR
STO R
UJP L14
L13 LAB
LOD I,1,44
LDC I,66
EQU I
NOT
FJP L15
LOC 150
MST 2,4,4
LCA 'PADR,PSBR002'
PAR A
CUP P,2,ASSER003
L15 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND R,52
LOC 160
LDC I,0
FLT
EQU R
FJP L16
MST 2,4,4
LDC I,51
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L17
L16 LAB
LOC 170
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,52
LDA 1,35760
LOD I,1,39472
LOC 180
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND R,52
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 190
IXA 116
IND R,52
DVR
STO R
L17 LAB
L14 LAB
L12 LAB
L10 LAB
MST 2,0,0
CUP P,0,POPTO129
UJP L18
L7 LAB
LDA 1,35156
LDA 1,30804
LOD I,2,352
LOC 200
CHK J,0,15
IXA 4
IND I,0
CHK J,3,4
DEC I,3
IXA 16
LOD I,1,44
CHK J,63,66
DEC I,63
IXA 4
LOC 210
IND I,0
CHK I,0,285
STR I,2,12
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 220
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,32,32
LOC 230
LDA 2,444
PAR A
LOD I,2,12
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LOD B,2,360
LOC 240
PAR B
LOD B,2,360
PAR B
LOD B,2,360
PAR B
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 250
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
LOC 260
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOC 270
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
PAR A
LOD I,2,352
CHK I,0,15
PAR I
LOD I,2,444
LOC 280
CHK I,0,31
PAR I
CUP P,8,REG$D113
L18 LAB
UJP L5
L19 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 290
IXA 116
IND A,0
CHK A,-1,0
STR A,2,356
LOD I,1,52
LDC I,3
NEQ I
FJP L20
LDA 1,34132
LDA 1,35760
LOC 300
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
IXA 64
LDA 1,35760
LOC 310
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK I,0,15
STR I,2,352
LOC 320
LOD I,2,352
LDC I,1
EQU I
FJP L21
MST 2,4,4
LDC I,10
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L22
L21 LAB
LOC 330
LOD I,2,352
LOD I,1,52
NEQ I
FJP L23
MST 2,4,4
LDC I,67
CHK I,0,68
PAR I
CUP P,2,ERROR005
L23 LAB
L22 LAB
MST 2,8,8
LOC 340
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,2,352
CHK I,0,15
PAR I
CUP P,4,COERC114
MST 2,8,8
LOC 350
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,352
CHK I,0,15
PAR I
CUP P,4,COERC114
LOD I,2,352
ORD
CHK S,0,63
LOC 360
LDC S,(0,0,0,1028)
INN
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LOC 370
LDC I,0
EQU I
AND
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
LOC 380
EQU I
AND
FJP L24
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 390
IND I,60
LDC I,1
EQU I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,60
LDC I,1
LOC 400
EQU I
AND
NOT
FJP L25
MST 2,4,4
LCA 'PEQU,PNEQ001'
PAR A
CUP P,2,ASSER003
L25 LAB
LDA 1,35760
LOD I,1,39472
LOC 410
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOC 420
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
SBI
STO I
LOC 430
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,64
LDC I,0
STO I
L24 LAB
LOC 440
LOD I,2,352
LDC I,5
EQU I
FJP L26
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 450
IXA 116
IND I,8
LDC I,1
EQU I
FJP L27
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 460
PAR I
CUP P,2,BJUMP120
L27 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,8
LDC I,1
EQU I
LOC 470
FJP L28
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,BJUMP120
L28 LAB
L26 LAB
LDA 1,35188
LDA 1,30804
LOD I,2,352
CHK J,0,15
LOC 480
IXA 4
IND I,0
CHK J,1,4
DEC I,1
IXA 24
LOD I,1,44
CHK J,67,72
DEC I,67
IXA 4
IND I,0
LOC 490
CHK I,0,285
STR I,2,12
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 500
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LOD I,1,39472
LOC 510
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,LOADS119
LDA 1,35308
LDC I,6
LOC 520
CHK J,0,31
IXA 1
IND B,0
NOT
LOD I,1,35492
LOD I,1,39472
LDC I,1
SBI
LES I
AND
LOC 530
FJP L29
MST 2,0,0
CUP P,0,MOVE$085
L29 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
LOC 540
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
UJP L30
L20 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 550
CHK J,-1,30
INC I,1
IXA 116
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
NOT
LDA 1,35760
LOC 560
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
NOT
LOC 570
IOR
FJP L31
MST 2,4,4
LDC I,11
CHK I,0,68
PAR I
CUP P,2,ERROR005
L31 LAB
MST 2,4,4
LDC I,34
CHK I,32,39
LOC 580
PAR I
CUP P,2,ALLOC078
LDC I,35
CHK I,32,39
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,ALLOC078
LOC 590
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,ALLOC078
LOD I,2,448
LOC 600
INC I,1
CHK I,32,39
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,ALLOC078
LOD I,2,448
INC I,1
LOC 610
CHK I,32,39
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,ALLOC078
LOD I,2,448
INC I,1
CHK I,32,39
LOC 620
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,ALLOC078
LDC I,34
CHK I,32,39
STR I,2,448
MST 2,8,8
LOC 630
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,12,12
LDC I,75
LOC 640
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 1,4400
PAR A
CUP P,6,EMITX077
LDC I,35
CHK I,32,39
STR I,2,448
LOC 650
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,8,8
LOC 660
LDA 2,184
PAR A
LDC I,34
LDC I,4
MPI
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
LOC 670
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
LOC 680
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,8,8
LOC 690
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
LOD I,2,448
INC I,1
LOC 700
CHK I,32,39
STR I,2,448
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
LOC 710
CUP P,4,ADDR$075
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,72
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
LOC 720
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
LOC 730
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,8,8
LOC 740
LDA 2,240
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
LOC 750
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,8,8
LOC 760
LDA 2,184
PAR A
LOD I,1,72
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,240
LOC 770
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,184
PAR A
LDC I,35
LDC I,4
MPI
LOC 780
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,0,0
CUP P,0,FINDR084
LOD I,1,35476
CHK I,0,31
STR I,2,440
MST 2,8,8
LDA 2,240
LOC 790
PAR A
LOD I,2,440
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 1,35284
LOD I,1,44
CHK J,67,72
DEC I,67
LOC 800
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOD I,2,440
LOC 810
CHK I,0,31
STR I,2,444
MST 2,8,8
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
LOC 820
PAR I
CUP P,4,LOADS119
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,444
CHK I,0,31
PAR I
LOC 830
CUP P,4,REG$O063
MST 2,8,8
LDA 2,184
PAR A
LDC I,-1
PAR I
CUP P,4,IMM$O064
LDC I,181
CHK I,0,285
STR I,2,12
LOC 840
LDA 1,35308
LDC I,6
CHK J,0,31
IXA 1
IND B,0
NOT
FJP L32
MST 2,0,0
CUP P,0,MOVE$085
L32 LAB
MST 2,4,4
LOC 850
LOD I,2,444
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LDC I,34
CHK I,32,39
PAR I
CUP P,2,FREEG079
LDC I,35
LOC 860
CHK I,32,39
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,FREEG079
LOD I,2,448
INC I,1
CHK I,32,39
LOC 870
STR I,2,448
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,FREEG079
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
LOC 880
MST 2,4,4
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,FREEG079
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
MST 2,4,4
LOC 890
LOD I,2,448
CHK I,32,39
PAR I
CUP P,2,FREEG079
LOD I,2,448
INC I,1
CHK I,32,39
STR I,2,448
MST 2,4,4
LOD I,2,448
LOC 900
CHK I,32,39
PAR I
CUP P,2,FREEG079
L30 LAB
LOD A,1,328
CHK A,-1,0
STR A,2,408
MST 2,20,20
LOD I,2,12
CHK I,0,285
PAR I
LOC 910
LDC I,0
CHK I,-8,7
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC N
CHK A,-1,0
PAR A
LOC 920
CUP P,10,EMITS104
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
PAR A
LOC 930
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,408
CHK A,-1,0
PAR A
LOC 940
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LDA 1,4576
LOC 950
MOV 116
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
LOD A,2,356
CHK A,-1,0
LOC 960
STO A
LOD A,3,8
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
INC A,72
LDC I,1
CHK I,0,2
LOC 970
STO I
MST 2,0,0
CUP P,0,FINDR084
LOD A,3,8
INC A,84
LDC I,0
STO I
LOD A,3,8
INC A,88
LOD I,1,35476
LOC 980
CHK I,0,31
STO I
LOD A,3,8
INC A,8
LDC I,1
CHK I,0,1
STO I
LOD A,3,8
INC A,12
LDA 1,4736
LOC 990
MOV 12
LOD A,3,8
INC A,24
LDA 1,4736
MOV 12
LOD A,3,8
INC A,40
LDC B,0
STO B
LOD A,3,8
LOC 1000
INC A,36
LOD A,2,408
CHK A,-1,0
STO A
UJP L5
L2 DEF 63
L3 DEF 72
L4 LAB
UJP L6
UJP L6
UJP L6
UJP L6
UJP L19
LOC 1010
UJP L19
UJP L19
UJP L19
UJP L19
UJP L19
L5 LAB
RET P
L1 DEF 12
SST P CASE5214 3 0 0 0 0
LOC 0
CASE5214 ENT P,3,L1 CASE5 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 10
INC I,1
IXA 116
IND I,4
LDC I,5
NEQ I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 20
IND I,4
LDC I,5
NEQ I
IOR
FJP L7
MST 2,4,4
LDC I,4
CHK I,0,68
PAR I
CUP P,2,ERROR005
L7 LAB
LOC 30
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
STR A,2,356
LOC 40
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,8
LDC I,0
EQU I
LOC 50
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,8
LDC I,0
EQU I
AND
FJP L8
LOC 60
LOD I,1,44
LDC I,22
EQU I
FJP L9
LDC I,1
CHK I,0,1
STR I,2,456
UJP L10
L9 LAB
LDC I,0
CHK I,0,1
LOC 70
STR I,2,456
L10 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L11
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 80
INC I,1
IXA 116
IND I,64
LOD I,2,456
EQU I
FJP L12
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
LOC 90
CHK I,-1,30
PAR I
CUP P,2,FREED090
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 100
LDA 1,4576
MOV 116
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOC 110
LOD A,3,8
LOD A,2,356
CHK A,-1,0
STO A
LOD A,3,8
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
LOC 120
INC A,8
LDC I,0
CHK I,0,1
STO I
LOD A,3,8
INC A,64
LOD I,2,456
STO I
UJP L13
L12 LAB
L13 LAB
MST 2,4,4
LOC 130
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
UJP L14
L11 LAB
MST 2,4,4
LOD I,1,39472
LDC I,1
LOC 140
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L15
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 150
PAR I
CUP P,2,FREED090
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LOC 160
LOD I,2,456
EQU I
FJP L16
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 170
LDA 1,4576
MOV 116
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOC 180
LOD A,3,8
LOD A,2,356
CHK A,-1,0
STO A
LOD A,3,8
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
LOC 190
INC A,8
LDC I,0
CHK I,0,1
STO I
LOD A,3,8
INC A,64
LOD I,2,456
STO I
UJP L17
L16 LAB
LDA 1,35760
LOC 200
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 210
IXA 116
MOV 116
LOD I,1,35492
LOD I,1,39472
EQU I
FJP L18
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 220
STR I,1,35492
L18 LAB
L17 LAB
MST 2,0,0
CUP P,0,POPTO129
UJP L19
L15 LAB
LOD I,1,44
LDC I,3
EQU I
FJP L20
LDC I,13
CHK I,0,285
LOC 230
STR I,2,12
UJP L21
L20 LAB
LDC I,154
CHK I,0,285
STR I,2,12
L21 LAB
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
LOC 240
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 250
CUP P,4,GET$O108
MST 2,32,32
LDA 2,444
PAR A
LOD I,2,12
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
LOC 260
PAR A
LDC B,0
PAR B
LDC B,0
PAR B
LDC B,0
PAR B
LOD I,1,39472
LDC I,1
SBI
LOC 270
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
LOC 280
CUP P,4,FREER091
MST 2,0,0
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
LOC 290
CUP P,4,FREER091
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
PAR A
LDC I,5
CHK I,0,15
LOC 300
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 310
INC A,8
LDC I,0
CHK I,0,1
STO I
L19 LAB
L14 LAB
UJP L22
L8 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 320
INC I,1
IXA 116
IND I,8
LDC I,0
EQU I
FJP L23
LOD I,1,39472
CHK I,-1,30
STR I,2,372
LOD I,1,39472
LOC 330
LDC I,1
SBI
CHK I,-1,30
STR I,2,368
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
LOD A,1,328
LOC 340
CHK A,-1,0
STO A
MST 2,4,4
LOD I,2,368
CHK I,-1,30
PAR I
CUP P,2,BINTV122
UJP L24
L23 LAB
LOD I,1,39472
LDC I,1
LOC 350
SBI
CHK I,-1,30
STR I,2,372
LOD I,1,39472
CHK I,-1,30
STR I,2,368
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 360
IXA 116
IND I,8
LDC I,0
EQU I
FJP L25
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,BINTV122
L25 LAB
L24 LAB
LOC 370
LOD I,1,44
LDC I,3
EQU I
FJP L26
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
IND B,40
LOC 380
FJP L27
MST 2,4,4
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
IND A,36
CHK A,-1,0
PAR A
LOC 390
CUP P,2,INVER045
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
INC A,40
LDC B,0
STO B
L27 LAB
MST 2,4,4
LOC 400
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
IND A,36
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
LOC 410
STR A,2,400
MST 2,4,4
MST 2,4,4
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
IND A,36
CHK A,-1,0
LOC 420
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
PAR A
CUP A,2,AFTER044
MST 2,4,4
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
LOC 430
IXA 116
IND A,0
CHK A,-1,0
PAR A
CUP A,2,AFTER044
EQU A
NOT
FJP L28
MST 2,4,4
LCA 'PAND 001'
LOC 440
PAR A
CUP P,2,ASSER003
L28 LAB
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
IND A,20
CHK A,-1,0
STR A,2,396
L29 LAB
LOC 450
LOD A,2,396
LDC N
NEQ A
FJP L30
MST 2,4,4
LOD A,2,396
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
LOC 460
STR A,2,392
MST 2,8,8
LOD A,2,396
CHK A,-1,0
PAR A
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
LOC 470
IND A,0
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,392
CHK A,-1,0
STR A,2,396
UJP L29
L30 LAB
MST 2,12,12
LDA 1,35760
LOC 480
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,24
PAR A
LDA 1,35760
LOD I,1,39472
LOC 490
CHK J,-1,30
INC I,1
IXA 116
INC A,24
PAR A
LOD A,2,400
CHK A,-1,0
PAR A
CUP P,6,ADD$J051
LDA 1,35760
LOC 500
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,12
LDA 1,35760
LOD I,2,368
CHK J,-1,30
LOC 510
INC I,1
IXA 116
INC A,12
MOV 12
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 520
IXA 116
INC A,36
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
IND A,36
CHK A,-1,0
STO A
LOC 530
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,40
LDA 1,35760
LOD I,2,368
LOC 540
CHK J,-1,30
INC I,1
IXA 116
IND B,40
STO B
UJP L31
L26 LAB
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
LOC 550
IXA 116
IND B,40
NOT
FJP L32
MST 2,4,4
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
LOC 560
IND A,36
CHK A,-1,0
PAR A
CUP P,2,INVER045
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
INC A,40
LOC 570
LDC B,1
STO B
L32 LAB
MST 2,4,4
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
IND A,36
CHK A,-1,0
LOC 580
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,400
MST 2,4,4
MST 2,4,4
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
LOC 590
IXA 116
IND A,36
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
PAR A
CUP A,2,AFTER044
MST 2,4,4
LDA 1,35760
LOC 600
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
PAR A
CUP A,2,AFTER044
EQU A
NOT
LOC 610
FJP L33
MST 2,4,4
LCA 'PIOR 001'
PAR A
CUP P,2,ASSER003
L33 LAB
LDA 1,35760
LOD I,2,372
CHK J,-1,30
INC I,1
IXA 116
LOC 620
IND A,32
CHK A,-1,0
STR A,2,396
L34 LAB
LOD A,2,396
LDC N
NEQ A
FJP L35
MST 2,4,4
LOD A,2,396
CHK A,-1,0
LOC 630
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,392
MST 2,8,8
LOD A,2,396
CHK A,-1,0
PAR A
LDA 1,35760
LOD I,2,368
LOC 640
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,392
CHK A,-1,0
STR A,2,396
LOC 650
UJP L34
L35 LAB
MST 2,12,12
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,12
LOC 660
PAR A
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,12
PAR A
LOD A,2,400
CHK A,-1,0
LOC 670
PAR A
CUP P,6,ADD$J051
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,24
LOC 680
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
INC A,24
MOV 12
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 690
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,36
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
LOC 700
IND A,36
CHK A,-1,0
STO A
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 710
INC A,40
LDA 1,35760
LOD I,2,368
CHK J,-1,30
INC I,1
IXA 116
IND B,40
STO B
L31 LAB
MST 2,4,4
LOD I,1,39472
LOC 720
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 730
LOD A,2,356
CHK A,-1,0
STO A
L22 LAB
UJP L5
L2 DEF 3
L3 DEF 22
L4 LAB
UJP L6
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 740
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 750
UJP L5
UJP L5
UJP L5
UJP L6
L5 LAB
RET P
L1 DEF 12
SST P CASE6215 3 0 0 0 0
LOC 0
CASE6215 ENT P,3,L1 CASE6 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 10
INC I,1
IXA 116
IND I,4
LDC I,7
NEQ I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 20
IND I,4
LDC I,7
NEQ I
IOR
FJP L7
MST 2,4,4
LDC I,55
CHK I,0,68
PAR I
CUP P,2,ERROR005
LOC 30
UJP L8
L7 LAB
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
MST 2,4,4
LOD I,1,39472
LOC 40
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
AND
FJP L9
LOD I,1,44
LDC I,11
EQU I
FJP L10
LDA 1,35760
LOC 50
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,44
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 60
SBI
CHK J,-1,30
INC I,1
IXA 116
IND S,44
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 70
IND S,44
DIF
STO S
UJP L11
L10 LAB
LOD I,1,44
LDC I,21
EQU I
FJP L12
LDA 1,35760
LOD I,1,39472
LOC 80
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,44
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 90
CHK J,-1,30
INC I,1
IXA 116
IND S,44
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND S,44
LOC 100
INT
STO S
UJP L13
L12 LAB
LOD I,1,44
LDC I,61
EQU I
FJP L14
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 110
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,44
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 120
INC I,1
IXA 116
IND S,44
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND S,44
UNI
LOC 130
STO S
UJP L15
L14 LAB
LDC B,0
NOT
FJP L16
MST 2,4,4
LCA 'PDIF,PINT001'
PAR A
CUP P,2,ASSER003
L16 LAB
L15 LAB
L13 LAB
L11 LAB
MST 2,0,0
LOC 140
CUP P,0,POPTO129
UJP L17
L9 LAB
LOD I,1,44
LDC I,11
EQU I
FJP L18
LDC I,15
CHK I,0,285
STR I,2,12
UJP L19
L18 LAB
LOC 150
LOD I,1,44
LDC I,21
EQU I
FJP L20
LDC I,14
CHK I,0,285
STR I,2,12
UJP L21
L20 LAB
LOD I,1,44
LDC I,61
LOC 160
EQU I
FJP L22
LDC I,155
CHK I,0,285
STR I,2,12
UJP L23
L22 LAB
LDC B,0
NOT
FJP L24
MST 2,4,4
LOC 170
LCA 'PDIF,PINT002'
PAR A
CUP P,2,ASSER003
L24 LAB
L23 LAB
L21 LAB
L19 LAB
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 180
PAR I
CUP P,4,GET$O108
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,32,32
LOC 190
LDA 2,444
PAR A
LOD I,2,12
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC B,1
LOC 200
PAR B
LDC B,1
PAR B
LDC B,1
PAR B
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LOC 210
CUP P,16,ALLOC107
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,0,0
LOC 220
CUP P,0,POPTO129
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOC 230
LOD I,1,39472
CHK I,-1,30
PAR I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
LOC 240
PAR A
LDC I,7
CHK I,0,15
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
L17 LAB
L8 LAB
UJP L5
L25 LAB
LOD I,1,44
LOC 250
LDC I,48
EQU I
FJP L26
LOD I,1,39472
CHK I,-1,30
STR I,2,388
UJP L27
L26 LAB
LOD I,1,39472
LDC I,1
SBI
LOC 260
CHK I,-1,30
STR I,2,388
L27 LAB
LDA 1,35760
LOD I,2,388
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LDA 1,30964
LOD A,3,8
LOC 270
IND I,4
CHK J,0,15
IXA 1
IND B,0
NOT
LOD A,3,8
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,96)
LOC 280
INN
NOT
AND
FJP L28
MST 2,4,4
LDC I,56
CHK I,0,68
PAR I
CUP P,2,ERROR005
L28 LAB
LOD A,3,8
LOC 290
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,96)
INN
FJP L29
LOD A,3,8
IND I,4
LDC I,5
EQU I
LOC 300
LOD A,3,8
IND I,8
LDC I,1
EQU I
AND
FJP L30
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
LOC 310
CUP P,2,BJUMP120
L30 LAB
LOD A,3,8
INC A,4
LDC I,8
CHK I,0,15
STO I
L29 LAB
MST 2,8,8
LOD I,2,388
CHK I,-1,30
PAR I
LOC 320
LDC I,10
CHK I,0,15
PAR I
CUP P,4,COERC114
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L31
LOC 330
LOD A,3,8
INC A,4
LDC I,7
CHK I,0,15
STO I
LOD A,3,8
INC A,44
LOD A,3,8
IND I,64
CHK S,0,63
LOC 340
SGS
STO S
LOD A,3,8
INC A,64
LDC I,0
STO I
UJP L32
L31 LAB
MST 2,8,8
LDA 2,240
PAR A
LOC 350
LDC I,1
PAR I
CUP P,4,IMM$O064
MST 2,8,8
LDA 2,184
PAR A
LOD I,2,388
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOC 360
MST 2,32,32
LDA 2,444
PAR A
LDC I,165
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LOC 370
LDC B,1
PAR B
LDC B,1
PAR B
LDC B,0
PAR B
LOD I,2,388
CHK I,-1,30
PAR I
CUP P,16,ALLOC107
LOC 380
MST 2,8,8
LOD I,2,388
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
MST 2,16,16
LOD I,2,388
LOC 390
CHK I,-1,30
PAR I
LOD A,3,8
IND A,0
CHK A,-1,0
PAR A
LDC I,7
CHK I,0,15
PAR I
LOD I,2,444
LOC 400
CHK I,0,31
PAR I
CUP P,8,REG$D113
L32 LAB
LOD I,1,44
LDC I,20
EQU I
FJP L33
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 410
INC I,1
IXA 116
IND I,4
LDC I,7
NEQ I
FJP L34
MST 2,4,4
LDC I,22
CHK I,0,68
PAR I
LOC 420
CUP P,2,ERROR005
L34 LAB
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
MST 2,4,4
LOD I,1,39472
LOC 430
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
AND
FJP L35
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 440
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
INC A,8
LOC 450
LDC I,0
CHK I,0,1
STO I
LOD A,3,8
INC A,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 460
INC I,1
IXA 116
IND S,44
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND S,44
INT
LOC 470
LDC S,(0,0,0,0)
NEQ S
ORD
STO I
LOD A,3,8
INC A,44
LDC S,(0,0,0,0)
STO S
MST 2,0,0
CUP P,0,POPTO129
LOC 480
UJP L36
L35 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
LOC 490
STR A,2,356
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOC 500
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
MST 2,8,8
LOD I,1,39472
LDC I,1
LOC 510
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,LOADS119
LDA 1,35308
LDC I,6
CHK J,0,31
LOC 520
IXA 1
IND B,0
NOT
LOD I,1,35492
LOD I,1,39472
LDC I,1
SBI
LES I
AND
FJP L37
LOC 530
MST 2,0,0
CUP P,0,MOVE$085
L37 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
MST 2,4,4
LOC 540
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
LOD A,1,328
CHK A,-1,0
STR A,2,408
MST 2,20,20
LDC I,196
CHK I,0,285
LOC 550
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LDC N
CHK A,-1,0
LOC 560
PAR A
CUP P,10,EMITS104
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
LOC 570
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,408
CHK A,-1,0
LOC 580
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 590
LDA 1,4576
MOV 116
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
LOD A,2,356
LOC 600
CHK A,-1,0
STO A
LOD A,3,8
INC A,4
LDC I,5
CHK I,0,15
STO I
LOD A,3,8
INC A,8
LDC I,1
LOC 610
CHK I,0,1
STO I
LOD A,3,8
INC A,72
LDC I,1
CHK I,0,2
STO I
MST 2,0,0
CUP P,0,FINDR084
LOD A,3,8
LOC 620
INC A,84
LDC I,0
STO I
LOD A,3,8
INC A,88
LOD I,1,35476
CHK I,0,31
STO I
LOD A,3,8
INC A,12
LOC 630
LDA 1,4736
MOV 12
LOD A,3,8
INC A,24
LDA 1,4736
MOV 12
LOD A,3,8
INC A,40
LDC B,1
STO B
LOC 640
LOD A,3,8
INC A,36
LOD A,2,408
CHK A,-1,0
STO A
L36 LAB
L33 LAB
UJP L5
L38 LAB
LOD I,1,72
LDC I,1
EQU I
STR B,1,304
LOC 650
UJP L5
L2 DEF 4
L3 DEF 61
L4 LAB
UJP L38
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L6
UJP L5
LOC 660
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L25
UJP L6
UJP L5
LOC 670
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 680
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 690
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L25
UJP L5
UJP L5
UJP L5
UJP L5
LOC 700
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L6
L5 LAB
RET P
L1 DEF 12
SST P CASE7216 3 0 0 0 0
LOC 0
CASE7216 ENT P,3,L1 CASE7 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LOD I,1,72
STR I,1,5024
LOD I,1,72
LDC I,0
GRT I
LOC 10
FJP L7
LOD B,1,305
FJP L8
MST 2,8,8
LDC I,1
CHK I,0,285
PAR I
LOD I,1,72
PAR I
CUP P,4,EMITF076
L8 LAB
L7 LAB
LOC 20
UJP L5
L9 LAB
MST 2,12,12
LDA 2,452
PAR A
MST 2,4,4
LDA 1,112
PAR A
CUP I,2,LABEL028
CHK I,1,99999
PAR I
LOC 30
LDC I,1
CHK I,0,1
PAR I
CUP P,6,UPD$L049
LOD A,2,452
CHK A,0,0
STR A,3,8
LOD A,3,8
IND B,8
FJP L10
LOC 40
MST 2,4,4
LDC I,41
CHK I,0,68
PAR I
CUP P,2,ERROR005
L10 LAB
LOD A,3,8
INC A,8
LDC B,1
STO B
LOD A,3,8
LOC 50
INC A,12
LOD A,1,328
CHK A,-1,0
STO A
LOD A,3,8
IND B,28
FJP L11
LDC B,1
STR B,1,35757
L11 LAB
LOD A,3,8
LOC 60
IND A,24
CHK A,-1,0
STR A,2,396
L12 LAB
LOD A,2,396
LDC N
NEQ A
FJP L13
MST 2,4,4
LOD A,2,396
CHK A,-1,0
LOC 70
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,392
MST 2,8,8
LOD A,2,396
CHK A,-1,0
PAR A
LOD A,3,8
IND A,12
LOC 80
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,392
CHK A,-1,0
STR A,2,396
UJP L12
L13 LAB
LOD A,3,8
INC A,16
LDA 1,4736
LOC 90
MOV 12
UJP L5
L14 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LOC 100
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
NOT
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 110
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
NOT
IOR
FJP L15
MST 2,4,4
LDC I,38
LOC 120
CHK I,0,68
PAR I
CUP P,2,ERROR005
L15 LAB
LOD I,1,72
LDC I,225
GEQ I
FJP L16
MST 2,4,4
LDC I,34
CHK I,32,39
LOC 130
PAR I
CUP P,2,ALLOC078
MST 2,4,4
LDC I,0
CHK I,0,31
PAR I
CUP P,2,ALLOC080
MST 2,4,4
LDC I,0
INC I,1
LOC 140
CHK I,0,31
PAR I
CUP P,2,ALLOC080
MST 2,4,4
LDC I,0
INC I,1
INC I,1
CHK I,0,31
PAR I
CUP P,2,ALLOC080
LOC 150
LDC I,34
CHK I,32,39
STR I,2,448
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
LOC 160
PAR I
CUP P,4,ADDR$075
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 1,4400
PAR A
LOC 170
CUP P,6,EMITX077
MST 2,8,8
LDA 2,72
PAR A
LDC I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,184
LOC 180
PAR A
LDC I,34
LDC I,4
MPI
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LOC 190
LDA 2,72
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,72
PAR A
LDC I,0
INC I,1
LOC 200
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,72
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 210
PAR I
CUP P,4,MOVE$110
MST 2,8,8
LDA 2,72
PAR A
LDC I,0
INC I,1
INC I,1
CHK I,0,31
PAR I
LOC 220
CUP P,4,REG$O063
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,72
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
LOC 230
PAR I
LDA 2,72
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,72
PAR A
LDC I,0
LOC 240
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$A138
LOC 250
MST 2,12,12
LDC I,23
CHK I,0,285
PAR I
LDA 2,72
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,4,4
LOC 260
LDC I,34
CHK I,32,39
PAR I
CUP P,2,FREEG079
MST 2,4,4
LDC I,0
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LOC 270
LDC I,0
INC I,1
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LDC I,0
INC I,1
INC I,1
CHK I,0,31
LOC 280
PAR I
CUP P,2,FREER082
UJP L17
L16 LAB
LOD I,1,72
STR I,2,560
L18 LAB
LOD I,2,560
LDC I,128
GEQ I
FJP L19
MST 2,8,8
LOC 290
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,8,8
LDA 2,184
LOC 300
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LDC I,115
CHK I,0,285
PAR I
LDA 2,240
LOC 310
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOD I,2,560
LDC I,128
SBI
STR I,2,560
LOD I,2,560
LDC I,0
LOC 320
GRT I
FJP L20
MST 2,8,8
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LDC I,128
PAR I
LOC 330
CUP P,4,INCRE121
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,128
PAR I
CUP P,4,INCRE121
L20 LAB
UJP L18
L19 LAB
LOD I,2,560
LOC 340
LDC I,64
GEQ I
FJP L21
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
LOC 350
PAR I
CUP P,4,GET$A138
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LOC 360
LDC I,114
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOD I,2,560
LDC I,64
LOC 370
SBI
STR I,2,560
LOD I,2,560
LDC I,0
GRT I
FJP L22
MST 2,8,8
LOD I,1,39472
LDC I,1
SBI
LOC 380
CHK I,-1,30
PAR I
LDC I,64
PAR I
CUP P,4,INCRE121
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LDC I,64
LOC 390
PAR I
CUP P,4,INCRE121
L22 LAB
L21 LAB
LOD I,2,560
LDC I,32
GEQ I
FJP L23
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LOC 400
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,8,8
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
LOC 410
PAR I
CUP P,4,GET$A138
MST 2,12,12
LDC I,113
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
LOC 420
CUP P,6,EMITX077
LOD I,2,560
LDC I,32
SBI
STR I,2,560
LOD I,2,560
LDC I,0
GRT I
FJP L24
MST 2,8,8
LOC 430
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
LDC I,32
PAR I
CUP P,4,INCRE121
MST 2,8,8
LOD I,1,39472
LOC 440
CHK I,-1,30
PAR I
LDC I,32
PAR I
CUP P,4,INCRE121
L24 LAB
L23 LAB
LOD I,2,560
LDC I,0
GRT I
FJP L25
MST 2,8,8
LOC 450
LDA 2,240
PAR A
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,8,8
LDA 2,184
LOC 460
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$A138
MST 2,12,12
LDA 1,31252
LOD I,2,560
CHK J,1,32
DEC I,1
LOC 470
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
L25 LAB
L17 LAB
MST 2,4,4
LOC 480
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 490
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L26 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
LOC 500
IXA 116
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,12)
INN
NOT
FJP L27
MST 2,4,4
LDC I,34
LOC 510
CHK I,0,68
PAR I
CUP P,2,ERROR005
L27 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
LOC 520
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,96)
INN
FJP L28
LOD A,3,8
IND I,4
LDC I,5
EQU I
LOC 530
LOD A,3,8
IND I,8
LDC I,1
EQU I
AND
FJP L29
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 540
CUP P,2,BJUMP120
L29 LAB
LOD A,3,8
INC A,4
LDC I,8
CHK I,0,15
STO I
L28 LAB
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 550
LDC I,10
CHK I,0,15
PAR I
CUP P,4,COERC114
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOC 560
LOD I,1,72
LDC I,1
NEQ I
FJP L30
LDC B,0
STR B,2,362
LDC B,0
STR B,2,361
MST 2,4,4
LOD I,1,72
LOC 570
PAR I
CUP I,2,POWER031
STR I,2,500
LOD A,3,8
IND A,0
CHK A,-1,0
STR A,2,356
L31 LAB
LOD I,2,500
LDC I,0
GEQ I
LOC 580
LOD A,3,8
IND I,68
LDC I,0
EQU I
AND
LOD A,3,8
IND I,56
LDC I,0
EQU I
AND
LOC 590
LOD A,3,8
IND I,72
LDC I,0
EQU I
LOD A,3,8
IND I,72
LDC I,1
EQU I
LOD A,3,8
IND I,76
LOC 600
LOD I,2,500
ADI
LDC I,3
LEQ I
AND
IOR
AND
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
LOC 610
PAR I
CUP B,2,IS$CO006
IOR
FJP L32
LDC B,1
STR B,2,362
UJP L33
L32 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
LOC 620
PAR I
CUP B,2,IS$CO127
FJP L34
LOD A,3,8
IND I,64
LOD I,1,72
MPI
STR I,2,496
LOD A,3,8
INC A,64
LOC 630
LDC I,0
STO I
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,72
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDA 2,363
LOC 640
PAR A
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,363
NOT
NOT
LOC 650
FJP L35
MST 2,4,4
LCA 'PMPI 001'
PAR A
CUP P,2,ASSER003
L35 LAB
LDC B,1
STR B,2,361
UJP L36
L34 LAB
MST 2,12,12
LDA 2,363
LOC 660
PAR A
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,6,FIT$I109
LOD B,2,363
FJP L37
MST 2,4,4
LOC 670
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
UJP L38
L37 LAB
LDC I,0
STR I,2,496
MST 2,8,8
LDA 2,240
PAR A
LOC 680
LOD I,1,72
PAR I
CUP P,4,IMM$O064
LDC B,1
STR B,2,361
L38 LAB
L36 LAB
L33 LAB
LOD B,2,362
LOD B,2,361
IOR
FJP L31
LOD B,2,361
LOC 690
FJP L39
MST 2,16,16
LDA 2,444
PAR A
LDA 2,240
PAR A
LDA 2,184
PAR A
LOD I,1,39472
CHK I,-1,30
LOC 700
PAR I
CUP P,8,MULT$144
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,2,444
CHK I,0,31
PAR I
CUP P,4,FREER091
LOC 710
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
PAR A
LDC I,10
CHK I,0,15
PAR I
LOC 720
LOD I,2,444
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOD A,3,8
INC A,64
LOD I,2,496
STO I
UJP L40
L39 LAB
LOD A,3,8
LOC 730
INC A,64
LOD A,3,8
IND I,64
LOD I,1,72
MPI
STO I
LOD A,3,8
IND I,72
LDC I,1
LEQ I
LOC 740
LOD I,1,72
LDC I,1
EQU I
IOR
NOT
FJP L41
MST 2,4,4
LCA 'PIXA 002'
PAR A
CUP P,2,ASSER003
L41 LAB
LOC 750
LOD A,3,8
IND I,72
LDC I,1
EQU I
FJP L42
LOD A,3,8
INC A,76
LOD A,3,8
IND I,76
LOD I,2,500
LOC 760
ADI
CHK I,0,3
STO I
L42 LAB
LOD A,3,8
LOD A,2,356
CHK A,-1,0
STO A
L40 LAB
L30 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
LOC 770
PAR I
CUP B,2,IS$CO006
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDC I,0
EQU I
LOC 780
AND
FJP L43
UJP L44
L43 LAB
L45 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
LOC 790
GRT I
FJP L46
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
UJP L45
L46 LAB
L47 LAB
LDA 1,35760
LOD I,1,39472
LOC 800
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
GRT I
FJP L48
MST 2,4,4
LOC 810
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
UJP L47
L48 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 820
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
GRT I
FJP L49
L50 LAB
LDA 1,35760
LOD I,1,39472
LOC 830
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,1
GRT I
FJP L51
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
LOC 840
PAR I
CUP P,2,SIMPL111
UJP L50
L51 LAB
L49 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
LOC 850
GRT I
FJP L52
L53 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LOC 860
LDC I,1
GRT I
FJP L54
MST 2,4,4
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
LOC 870
UJP L53
L54 LAB
L52 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
LDA 1,35760
LOC 880
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,56
LDC I,0
EQU I
AND
LOC 890
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,68
LDC I,0
EQU I
AND
LDA 1,35760
LOC 900
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
LOC 910
INC I,1
IXA 116
IND I,72
ADI
LDC I,2
LEQ I
AND
NOT
FJP L55
MST 2,4,4
LOC 920
LCA 'PIXA 003'
PAR A
CUP P,2,ASSER003
L55 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
LOC 930
INC A,64
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,64
LDA 1,35760
LOC 940
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
ADI
STO I
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 950
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,0
EQU I
FJP L56
LDA 1,35760
LOD I,1,39472
LOC 960
CHK J,-1,30
INC I,1
IXA 116
IND I,72
XJP L57
L61 LAB
UJP L60
L62 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
LOC 970
CHK J,-1,30
INC I,1
IXA 116
INC A,76
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,76
LOC 980
MOV 20
UJP L60
L63 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,76
LOC 990
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
INC A,76
MOV 20
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 1000
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,96
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 1010
INC A,96
MOV 20
UJP L60
L57 DEF 0
L58 DEF 2
L59 LAB
UJP L61
UJP L62
UJP L63
L60 LAB
UJP L64
L56 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 1020
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,1
EQU I
FJP L65
LDA 1,35760
LOD I,1,39472
LOC 1030
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDC I,1
EQU I
FJP L66
LDA 1,35760
LOD I,1,39472
LDC I,1
LOC 1040
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,96
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 1050
INC A,76
MOV 20
L66 LAB
L65 LAB
L64 LAB
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
INC A,72
LOC 1060
LDA 1,35760
LOD I,1,39472
LDC I,1
SBI
CHK J,-1,30
INC I,1
IXA 116
IND I,72
LDA 1,35760
LOD I,1,39472
LOC 1070
CHK J,-1,30
INC I,1
IXA 116
IND I,72
ADI
CHK I,0,2
STO I
L44 LAB
LOD I,1,35492
LOD I,1,39472
EQU I
LOC 1080
FJP L67
LOD I,1,39472
LDC I,1
SBI
CHK I,-1,30
STR I,1,35492
L67 LAB
MST 2,0,0
CUP P,0,POPTO129
UJP L5
L2 DEF 23
L3 DEF 33
L4 LAB
UJP L26
LOC 1090
UJP L9
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L6
UJP L5
UJP L5
UJP L14
L5 LAB
LOC 1100
RET P
L1 DEF 12
SST P CASE8217 3 0 0 0 0
LOC 0
CASE8217 ENT P,3,L1 CASE8 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
MST 2,12,12
LDA 2,452
PAR A
MST 2,4,4
LDA 1,112
LOC 10
PAR A
CUP I,2,LABEL028
CHK I,1,99999
PAR I
LDC I,0
CHK I,0,1
PAR I
CUP P,6,UPD$L049
LOD A,2,452
CHK A,0,0
LOC 20
STR A,3,8
LOD A,3,8
IND B,8
FJP L7
MST 2,4,4
LDC I,41
CHK I,0,68
PAR I
CUP P,2,ERROR005
L7 LAB
LOD A,3,8
LOC 30
INC A,8
LDC B,1
STO B
LOD A,3,8
INC A,12
LOD I,1,72
STO I
LOD A,3,8
IND A,24
CHK A,-1,0
LOC 40
STR A,2,396
L8 LAB
LOD A,2,396
LDC N
NEQ A
FJP L9
MST 2,8,8
LOD A,2,396
CHK A,0,0
IND A,4
CHK A,-1,0
LOC 50
PAR A
LOD A,3,8
IND I,12
PAR I
CUP P,4,FIXOP048
LOD A,2,396
CHK A,0,0
IND A,0
CHK A,-1,0
STR A,2,396
LOC 60
UJP L8
L9 LAB
LOD A,3,8
INC A,16
LDA 1,4724
MOV 12
UJP L5
L10 LAB
LOD I,1,72
LDC I,0
LEQ I
FJP L11
LOC 70
MST 2,4,4
LDC I,32
CHK I,0,68
PAR I
CUP P,2,ERROR005
L11 LAB
LOD I,1,72
LOD I,1,5028
GRT I
FJP L12
LOD I,1,72
LOC 80
CHK I,0,8
STR I,1,5028
LDC I,29
LOD I,1,5028
LDC I,1
SBI
SBI
CHK I,0,31
STR I,1,35480
MST 2,0,0
LOC 90
CUP P,0,CHECK088
L12 LAB
LDA 1,39928
LOD I,1,72
CHK J,0,8
IXA 48
STR A,3,8
LOD A,3,8
LOD I,1,52
CHK I,0,15
STO I
LOC 100
LOD A,3,8
INC A,4
LDA 1,100
MOV 12
LOD A,3,8
INC A,44
LOD I,1,68
STO I
LOD A,3,8
INC A,40
LOC 110
LOD I,1,64
STO I
LOD A,3,8
INC A,36
LOD I,1,60
STO I
LOD A,3,8
INC A,28
LOD I,1,56
STO I
LOC 120
LOD A,3,8
IND I,28
LDC I,10
LDC I,4
MPI
GRT I
FJP L13
MST 2,4,4
LDC I,36
CHK I,0,68
LOC 130
PAR I
CUP P,2,ERROR005
L13 LAB
LOD I,1,72
LDC I,1
EQU I
FJP L14
LOD A,3,8
INC A,32
LDC I,44
STO I
LOC 140
LOD A,3,8
INC A,24
LDC I,172
LDC I,44
SBI
STO I
UJP L15
L14 LAB
LOD A,3,8
INC A,32
LDC I,8
LOC 150
STO I
LOD A,3,8
INC A,24
MST 2,8,8
LDC I,-32
LDC I,4
MPI
LOD A,3,8
IND I,32
ADI
LOC 160
LDC I,8
SBI
LDA 1,30868
LOD A,3,8
IND I,0
CHK J,0,15
IXA 4
IND I,0
ADI
LOD A,3,8
LOC 170
IND I,44
ADI
LOD A,3,8
IND I,40
ADI
NGI
PAR I
MST 2,8,8
LDC I,-32
LDC I,4
LOC 180
MPI
NGI
PAR I
LOD A,3,8
IND I,36
LDC I,3
LDC I,4
MPI
ADI
LDC I,31
LOC 190
LDC I,4
MPI
SBI
PAR I
CUP I,4,MIN00029
PAR I
CUP I,4,MAX00030
STO I
L15 LAB
LOD A,3,8
INC A,20
LOC 200
LOD A,3,8
IND I,32
LDC I,8
SBI
LDA 1,30868
LOD A,3,8
IND I,0
CHK J,0,15
IXA 4
IND I,0
LOC 210
ADI
LOD A,3,8
IND I,44
ADI
LOD A,3,8
IND I,40
ADI
LOD A,3,8
IND I,24
ADI
LOC 220
STO I
LOD A,3,8
INC A,16
LOD A,3,8
IND I,32
LOD A,3,8
IND I,44
ADI
LOD A,3,8
IND I,40
LOC 230
ADI
LOD A,3,8
IND I,24
ADI
STO I
LOD B,1,280
FJP L16
MST 2,4,4
LOD I,1,72
PAR I
LOC 240
CUP P,2,PRINT013
L16 LAB
UJP L5
L17 LAB
MST 2,0,0
CUP P,0,GEN$S177
UJP L5
L18 LAB
LDA 1,100
LCA 'PCODE '
EQU M,8
FJP L19
LDC B,1
LOC 250
STR B,1,285
UJP L20
L19 LAB
LDA 1,100
LCA 'S1CODE '
EQU M,8
FJP L21
LDA 1,88
LDC I,1
CHK J,1,8
DEC I,1
LOC 260
IXA 1
IND C,0
LDC C,'P'
EQU C
FJP L22
LDC B,1
STR B,1,284
UJP L23
L22 LAB
LOD A,1,324
CHK A,-1,0
LOC 270
STR A,2,552
LOD I,1,4860
STR I,2,556
L24 LAB
LOD A,2,552
LDC N
NEQ A
FJP L25
MST 2,8,8
LDA 2,556
PAR A
LOC 280
LOD A,2,552
CHK A,-1,0
PAR A
CUP P,4,DISAS007
MST 2,4,4
LOD A,2,552
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
LOC 290
STR A,2,552
UJP L24
L25 LAB
L23 LAB
UJP L26
L21 LAB
LDA 1,100
LCA 'STACK '
EQU M,8
FJP L27
LDA 1,88
LDC I,1
CHK J,1,8
LOC 300
DEC I,1
IXA 1
IND C,0
LDC C,'P'
EQU C
FJP L28
LDC B,1
STR B,1,282
UJP L29
L28 LAB
MST 2,4,4
LOC 310
LOD I,1,72
CHK I,-1,30
PAR I
CUP P,2,PRINT012
L29 LAB
UJP L30
L27 LAB
LDA 1,100
LCA 'MST '
EQU M,8
FJP L31
LDA 1,88
LOC 320
LDC I,1
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,'P'
EQU C
FJP L32
LDC B,1
STR B,1,281
LOC 330
UJP L33
L32 LAB
MST 2,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT014
L33 LAB
UJP L34
L31 LAB
LDA 1,100
LCA 'NEST '
EQU M,8
FJP L35
LOC 340
LDA 1,88
LDC I,1
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,'P'
EQU C
FJP L36
LDC B,1
LOC 350
STR B,1,280
UJP L37
L36 LAB
MST 2,4,4
LOD I,1,72
PAR I
CUP P,2,PRINT013
L37 LAB
UJP L38
L35 LAB
LDA 1,100
LCA 'SIMP '
EQU M,8
LOC 360
FJP L39
LDA 1,88
LDC I,1
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,'P'
EQU C
FJP L40
LOC 370
LDC B,1
STR B,1,283
UJP L41
L40 LAB
MST 2,4,4
LOD I,1,72
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
L41 LAB
UJP L42
L39 LAB
MST 2,4,4
LOC 380
LDC I,28
CHK I,0,68
PAR I
CUP P,2,ERROR005
L42 LAB
L38 LAB
L34 LAB
L30 LAB
L26 LAB
L20 LAB
UJP L5
L43 LAB
LDA 1,100
LCA 'S1CODE '
EQU M,8
FJP L44
LDC B,0
LOC 390
STR B,1,284
UJP L45
L44 LAB
LDA 1,100
LCA 'PCODE '
EQU M,8
FJP L46
LDC B,0
STR B,1,285
UJP L47
L46 LAB
LDA 1,100
LOC 400
LCA 'STACK '
EQU M,8
FJP L48
LDC B,0
STR B,1,282
UJP L49
L48 LAB
LDA 1,100
LCA 'MST '
EQU M,8
FJP L50
LOC 410
LDC B,0
STR B,1,281
UJP L51
L50 LAB
LDA 1,100
LCA 'NEST '
EQU M,8
FJP L52
LDC B,0
STR B,1,280
UJP L53
L52 LAB
LOC 420
LDA 1,100
LCA 'SIMP '
EQU M,8
FJP L54
LDC B,0
STR B,1,283
UJP L55
L54 LAB
MST 2,4,4
LDC I,28
CHK I,0,68
LOC 430
PAR I
CUP P,2,ERROR005
L55 LAB
L53 LAB
L51 LAB
L49 LAB
L47 LAB
L45 LAB
UJP L5
L56 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,3,8
LOD A,3,8
LOC 440
IND I,4
ORD
CHK S,0,63
LDC S,(0,0,0,116)
INN
LDA 1,30964
LOD A,3,8
IND I,4
CHK J,0,15
IXA 1
LOC 450
IND B,0
IOR
NOT
FJP L57
MST 2,4,4
LDC I,7
CHK I,0,68
PAR I
CUP P,2,ERROR005
L57 LAB
LOD A,3,8
LOC 460
IND I,4
LDC I,4
EQU I
FJP L58
LOD I,1,72
LDC I,0
LES I
FJP L59
UJP L60
L59 LAB
MST 2,4,4
LOC 470
LDC I,6
CHK I,0,68
PAR I
CUP P,2,ERROR005
L60 LAB
UJP L61
L58 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
LOC 480
FJP L62
LOD A,3,8
IND I,64
LOD I,1,72
LES I
LOD A,3,8
IND I,64
LOD I,1,68
GRT I
IOR
LOC 490
FJP L63
MST 2,4,4
LDC I,6
CHK I,0,68
PAR I
CUP P,2,ERROR005
L63 LAB
UJP L64
L62 LAB
MST 2,8,8
LDA 2,184
PAR A
LOC 500
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOD I,1,52
LDC I,2
EQU I
FJP L65
LOD A,3,8
IND I,4
LOC 510
LDC I,2
NEQ I
FJP L66
MST 2,4,4
LDC I,2
CHK I,0,68
PAR I
CUP P,2,ERROR005
L66 LAB
LOD I,1,72
LDC I,0
LOC 520
LES I
FJP L67
LOD A,1,328
CHK A,-1,0
STR A,2,408
MST 2,8,8
LDA 2,240
PAR A
LDC I,-1
PAR I
LOC 530
CUP P,4,IMM$O064
MST 2,20,20
LDC I,182
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,240
PAR A
LOC 540
LDA 2,184
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
LOD A,1,328
CHK A,-1,0
STR A,2,404
MST 2,20,20
LOC 550
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
PAR A
LDA 1,4400
PAR A
LOC 560
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,408
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
LOC 570
PAR A
CUP P,4,FIXSO046
L67 LAB
MST 2,8,8
LDA 2,240
PAR A
LDC I,124
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
LOD A,1,328
LOC 580
CHK A,-1,0
STR A,2,420
MST 2,20,20
LDC I,186
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,184
LOC 590
PAR A
LDA 2,240
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,8,8
LDA 2,240
PAR A
LOC 600
LDC I,124
LDC I,4
ADI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
LOD A,1,328
CHK A,-1,0
STR A,2,416
MST 2,20,20
LOC 610
LDC I,185
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,184
PAR A
LDA 2,240
PAR A
LOC 620
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,8,8
LOD A,2,420
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
LOC 630
PAR A
CUP P,4,FIXSO046
MST 2,20,20
LDC I,61
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
LOC 640
PAR A
LDA 1,4400
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,416
CHK A,-1,0
LOC 650
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
LOD I,1,72
LDC I,0
LES I
FJP L68
MST 2,8,8
LOC 660
LOD A,2,404
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
L68 LAB
UJP L69
L65 LAB
MST 2,8,8
LDA 2,240
LOC 670
PAR A
LOD I,1,72
PAR I
CUP P,4,IMM$O064
LOD A,1,328
CHK A,-1,0
STR A,2,420
MST 2,20,20
LDA 1,35188
LDA 1,30804
LOC 680
LOD A,3,8
IND I,4
CHK J,0,15
IXA 4
IND I,0
CHK J,1,4
DEC I,1
IXA 24
LDC I,72
CHK J,67,72
LOC 690
DEC I,67
IXA 4
IND I,0
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,184
PAR A
LOC 700
LDA 2,240
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,68
LOC 710
PAR I
CUP P,4,IMM$O064
LOD A,1,328
CHK A,-1,0
STR A,2,416
MST 2,20,20
LDA 1,35188
LDA 1,30804
LOD A,3,8
IND I,4
LOC 720
CHK J,0,15
IXA 4
IND I,0
CHK J,1,4
DEC I,1
IXA 24
LDC I,71
CHK J,67,72
DEC I,67
IXA 4
LOC 730
IND I,0
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
PAR I
LDA 2,184
PAR A
LDA 2,240
PAR A
LOC 740
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
MST 2,8,8
LOD A,2,420
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
LOC 750
PAR A
CUP P,4,FIXSO046
MST 2,20,20
LDC I,61
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
LOC 760
PAR A
LDA 1,4400
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,416
CHK A,-1,0
LOC 770
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
L69 LAB
L64 LAB
L61 LAB
UJP L5
L70 LAB
LOD I,1,39472
LDC I,1
LDC I,1
SBI
LOC 780
NEQ I
FJP L71
MST 2,4,4
LDC I,66
CHK I,0,68
PAR I
CUP P,2,ERROR005
L71 LAB
LOD A,1,328
CHK A,-1,0
STR A,2,404
LOC 790
LOD B,1,35757
ORD
CHK I,0,1
STR I,2,464
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LOD I,2,464
CHK I,0,1
LOC 800
PAR I
LDA 1,4512
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOC 810
LOD A,2,404
CHK A,-1,0
PAR A
MST 2,4,4
LDA 1,100
PAR A
CUP I,2,LABEL028
CHK I,1,99999
PAR I
CUP P,4,JUMP$054
LOC 820
UJP L5
L72 LAB
LOD I,1,39472
LDC I,1
NEQ I
FJP L73
MST 2,4,4
LDC I,16
CHK I,0,68
PAR I
CUP P,2,ERROR005
L73 LAB
LOC 830
MST 2,4,4
LDA 1,100
PAR A
CUP I,2,LABEL028
CHK I,1,99999
STR I,2,536
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
LOC 840
IXA 116
STR A,3,8
LOD A,3,8
IND I,4
LDC I,5
NEQ I
FJP L74
MST 2,4,4
LDC I,15
CHK I,0,68
LOC 850
PAR I
CUP P,2,ERROR005
L74 LAB
LOD A,3,8
IND I,8
LDC I,0
EQU I
FJP L75
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
LOC 860
PAR I
CUP B,2,IS$CO006
FJP L76
LOD A,3,8
IND I,64
LDC I,1
EQU I
FJP L77
UJP L78
L77 LAB
LOD A,1,328
LOC 870
CHK A,-1,0
STR A,2,404
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
LOC 880
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,404
CHK A,-1,0
LOC 890
PAR A
LOD I,2,536
CHK I,1,99999
PAR I
CUP P,4,JUMP$054
L78 LAB
UJP L79
L76 LAB
MST 2,8,8
LDA 2,240
PAR A
LOD I,1,39472
LOC 900
CHK I,-1,30
PAR I
CUP P,4,GET$O108
LOD A,1,328
CHK A,-1,0
STR A,2,404
MST 2,20,20
LDC I,64
CHK I,0,285
PAR I
LOC 910
LDC I,0
CHK I,0,1
PAR I
LDA 2,240
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
LOC 920
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,404
CHK A,-1,0
PAR A
LOD I,2,536
CHK I,1,99999
PAR I
CUP P,4,JUMP$054
L79 LAB
UJP L80
L75 LAB
LOC 930
LOD A,3,8
IND B,40
FJP L81
MST 2,4,4
LOD A,3,8
IND A,36
CHK A,-1,0
PAR A
CUP P,2,INVER045
LOD A,3,8
LOC 940
INC A,40
LDC B,0
STO B
L81 LAB
LOD A,3,8
IND A,20
CHK A,-1,0
STR A,2,396
L82 LAB
LOD A,2,396
LDC N
NEQ A
LOC 950
FJP L83
MST 2,4,4
LOD A,2,396
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,392
MST 2,8,8
LOD A,2,396
LOC 960
CHK A,-1,0
PAR A
LOD A,1,328
CHK A,-1,0
PAR A
CUP P,4,FIXJO047
LOD A,2,392
CHK A,-1,0
STR A,2,396
UJP L82
L83 LAB
LOC 970
LOD A,3,8
IND A,32
CHK A,-1,0
STR A,2,396
L84 LAB
LOD A,2,396
LDC N
NEQ A
FJP L85
MST 2,4,4
LOD A,2,396
LOC 980
CHK A,-1,0
PAR A
CUP A,2,JUMPS009
CHK A,-1,0
STR A,2,392
MST 2,8,8
LOD A,2,396
CHK A,-1,0
PAR A
LOD I,2,536
LOC 990
CHK I,1,99999
PAR I
CUP P,4,JUMP$054
LOD A,2,392
CHK A,-1,0
STR A,2,396
UJP L84
L85 LAB
MST 2,4,4
LOD A,3,8
IND A,36
LOC 1000
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,2,400
MST 2,8,8
LOD A,2,400
CHK A,-1,0
PAR A
LOD I,2,536
LOC 1010
CHK I,1,99999
PAR I
CUP P,4,JUMP$054
L80 LAB
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
LOC 1020
UJP L5
L86 LAB
LOD I,1,39472
LDC I,1
NEQ I
FJP L87
MST 2,4,4
LDC I,68
CHK I,0,68
PAR I
CUP P,2,ERROR005
L87 LAB
LOC 1030
MST 2,4,4
LDA 1,100
PAR A
CUP I,2,LABEL028
CHK I,1,99999
STR I,2,536
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOC 1040
LDC I,10
CHK I,0,15
PAR I
CUP P,4,COERC114
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP B,2,IS$CO006
FJP L88
LOC 1050
MST 2,8,8
LDA 2,296
PAR A
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,64
PAR I
LOC 1060
CUP P,4,IMM$O064
MST 2,12,12
LDA 2,240
PAR A
LDC I,3
CHK I,0,31
PAR I
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 1070
INC I,1
IXA 116
IND I,64
NGI
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
UJP L89
L88 LAB
MST 2,8,8
LDA 2,296
LOC 1080
PAR A
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,GET$S137
LDA 2,240
LDA 2,296
MOV 56
LDC I,1
CHK I,0,1
LOC 1090
STR I,2,240
LDC I,1
CHK I,0,1
STR I,2,264
LDC I,3
CHK I,0,3
STR I,2,272
LDC I,3
CHK I,0,31
STR I,2,280
LOC 1100
LDC I,0
CHK I,-16777216,16777215
STR I,2,340
L89 LAB
LOD A,1,328
CHK A,-1,0
STR A,2,484
MST 2,20,20
LDC I,186
CHK I,0,285
PAR I
LOC 1110
LDC I,0
CHK I,-8,7
PAR I
LDA 2,296
PAR A
LDA 1,4344
PAR A
LDC N
CHK A,-1,0
PAR A
LOC 1120
CUP P,10,EMITS104
LOD A,1,328
CHK A,-1,0
STR A,2,480
MST 2,20,20
LDC I,185
CHK I,0,285
PAR I
LDC I,0
CHK I,-8,7
LOC 1130
PAR I
LDA 2,296
PAR A
LDA 1,4344
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITS104
LOD A,1,328
LOC 1140
CHK A,-1,0
STR A,2,476
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
LOC 1150
PAR A
LDA 1,4400
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
LOD A,1,328
CHK A,-1,0
STR A,2,472
LOC 1160
MST 2,20,20
LDC I,63
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 1,4512
PAR A
LDA 2,240
LOC 1170
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,8,8
LOD A,2,484
CHK A,-1,0
PAR A
LOD I,2,536
LOC 1180
CHK I,1,99999
PAR I
CUP P,4,OPND2055
MST 2,8,8
LOD A,2,484
CHK A,-1,0
PAR A
LOD A,2,476
CHK A,-1,0
PAR A
LOC 1190
CUP P,4,FIXSO046
MST 2,8,8
LOD A,2,480
CHK A,-1,0
PAR A
LOD I,2,536
LDC I,1
ADI
CHK I,1,99999
PAR I
LOC 1200
CUP P,4,OPND2055
MST 2,8,8
LOD A,2,480
CHK A,-1,0
PAR A
LOD A,2,472
CHK A,-1,0
PAR A
CUP P,4,FIXSO046
MST 2,8,8
LOC 1210
LOD A,2,476
CHK A,-1,0
PAR A
LOD I,2,536
LDC I,3
ADI
CHK I,1,99999
PAR I
CUP P,4,JUMP$054
MST 2,8,8
LOC 1220
LOD A,2,472
CHK A,-1,0
PAR A
LOD I,2,536
CHK I,1,99999
PAR I
CUP P,4,OPND2055
MST 2,8,8
LDA 1,452
PAR A
LOC 1230
LOD A,2,472
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
MST 2,8,8
LOD A,2,472
CHK A,-1,0
PAR A
LOD I,2,536
LDC I,2
LOC 1240
ADI
CHK I,1,99999
PAR I
CUP P,4,JUMP$053
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
LOC 1250
CUP P,0,POPTO129
UJP L5
L2 DEF 5
L3 DEF 62
L4 LAB
UJP L56
UJP L5
UJP L5
UJP L5
UJP L5
UJP L6
UJP L5
UJP L5
LOC 1260
UJP L5
UJP L5
UJP L72
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 1270
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 1280
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 1290
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L10
LOC 1300
UJP L5
UJP L17
UJP L5
UJP L5
UJP L43
UJP L18
UJP L5
UJP L70
UJP L5
UJP L86
L5 LAB
LOC 1310
RET P
L1 DEF 12
SST P CASE9218 3 0 0 0 0
LOC 0
CASE9218 ENT P,3,L1 CASE9 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LOD I,1,316
LDC I,0
GRT I
FJP L7
MST 2,0,0
LOC 10
CUP P,0,GEN$S177
L7 LAB
LDA 1,5036
LDA 1,112
MOV 12
LOD I,1,72
CHK I,0,8
STR I,1,5032
MST 2,4,4
LDA 1,100
PAR A
LOC 20
CUP I,2,LABEL028
CHK I,1,99999
STR I,1,35752
LDA 1,5012
LDA 1,88
MOV 8
LOD I,1,60
LDC I,1
EQU I
STR B,1,305
LOC 30
MST 2,0,0
CUP P,0,INIT$176
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
STR A,3,8
LOD A,3,8
INC A,4
LDA 1,112
LOC 40
NEQ M,12
LOD A,3,8
IND I,0
LOD I,1,52
NEQ I
IOR
FJP L8
MST 2,4,4
LDC I,60
CHK I,0,68
LOC 50
PAR I
CUP P,2,ERROR005
L8 LAB
LDA 1,35500
LOD I,1,5032
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
STR I,1,5048
LOC 60
LOD I,1,35480
LOD I,1,5048
LEQ I
NOT
FJP L9
MST 2,4,4
LCA 'PENT 001'
PAR A
CUP P,2,ASSER003
L9 LAB
MST 2,4,4
LOC 70
LOD A,3,8
IND I,28
LDC I,4
DVI
CHK I,0,10
PAR I
CUP P,2,RESER089
LDC I,8
NGI
LDA 1,30868
LOC 80
LOD A,3,8
IND I,0
CHK J,0,15
IXA 4
IND I,0
ADI
STR I,2,488
LOD B,1,305
NOT
FJP L10
LOC 90
MST 2,8,8
LDA 2,128
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 2,184
PAR A
LOC 100
LDC I,30
CHK I,0,31
PAR I
LOD A,3,8
IND I,20
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOD A,1,328
CHK A,-1,0
LOC 110
STR A,2,412
MST 2,12,12
LDC I,66
CHK I,0,285
PAR I
LDA 2,128
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOC 120
MST 2,8,8
LDA 1,480
PAR A
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
MST 2,8,8
LDA 2,184
PAR A
LOC 130
LOD I,2,488
PAR I
CUP P,4,EXTEN071
LOD A,1,328
CHK A,-1,0
STR A,2,412
MST 2,12,12
LDC I,10
CHK I,0,285
PAR I
LOC 140
LDA 1,4804
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LOD A,2,412
CHK A,-1,0
PAR A
LOD I,1,35752
LOC 150
CHK I,1,99999
PAR I
CUP P,4,OPND2055
MST 2,8,8
LDA 1,480
PAR A
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
LOC 160
UJP L11
L10 LAB
MST 2,8,8
LDA 2,128
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 2,184
LOC 170
PAR A
LDC I,30
CHK I,0,31
PAR I
LOD A,3,8
IND I,20
LDC I,4
ADI
CHK I,-16777216,16777215
PAR I
LOC 180
CUP P,6,EXTEN073
LOD A,1,328
CHK A,-1,0
STR A,2,412
MST 2,12,12
LDC I,66
CHK I,0,285
PAR I
LDA 2,128
PAR A
LOC 190
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 1,480
PAR A
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
LOC 200
MST 2,8,8
LDA 2,240
PAR A
LDC I,33
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,8,8
LOC 210
LDA 2,184
PAR A
LOD I,2,488
LDC I,4
ADI
PAR I
CUP P,4,EXTEN071
LOD A,1,328
CHK A,-1,0
STR A,2,412
LOC 220
MST 2,12,12
LDC I,12
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LOC 230
LOD A,2,412
CHK A,-1,0
PAR A
LOD I,1,35752
CHK I,1,99999
PAR I
CUP P,4,OPND2055
MST 2,8,8
LDA 1,480
PAR A
LOC 240
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
MST 2,12,12
LDA 2,184
PAR A
LDC I,3
CHK I,0,31
PAR I
LOC 250
LDC I,0
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
MST 2,12,12
LDC I,66
CHK I,0,285
PAR I
LDA 2,240
PAR A
LOC 260
LDA 2,184
PAR A
CUP P,6,EMITX077
L11 LAB
LOD A,3,8
IND I,44
LOD A,3,8
IND I,28
SBI
STR I,2,492
LOD I,2,492
LOC 270
LDC I,0
GRT I
FJP L12
MST 2,4,4
LDC I,34
CHK I,32,39
PAR I
CUP P,2,ALLOC078
MST 2,4,4
LDC I,0
LOC 280
CHK I,0,31
PAR I
CUP P,2,ALLOC080
MST 2,4,4
LDC I,0
INC I,1
CHK I,0,31
PAR I
CUP P,2,ALLOC080
MST 2,4,4
LOC 290
LDC I,0
INC I,1
INC I,1
CHK I,0,31
PAR I
CUP P,2,ALLOC080
LDC I,34
CHK I,32,39
STR I,2,448
MST 2,8,8
LOC 300
LDA 2,240
PAR A
LOD I,2,448
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
MST 2,12,12
LDC I,75
LOC 310
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 1,4400
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,72
PAR A
LOC 320
LDC I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,184
PAR A
LDC I,34
LDC I,4
MPI
LOC 330
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,72
PAR A
LDA 2,184
PAR A
LOC 340
CUP P,6,EMITX077
MST 2,8,8
LDA 2,72
PAR A
LDC I,0
INC I,1
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LOC 350
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,3,8
IND I,24
LOD A,3,8
IND I,40
ADI
LOC 360
LOD A,3,8
IND I,44
ADI
NGI
LOD A,3,8
IND I,28
ADI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
LOC 370
MST 2,12,12
LDC I,66
CHK I,0,285
PAR I
LDA 2,72
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LOC 380
LDA 2,72
PAR A
LDC I,0
INC I,1
INC I,1
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 2,184
LOC 390
PAR A
LOD I,2,492
PAR I
CUP P,4,IMM$O064
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,72
PAR A
LOC 400
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,72
PAR A
LDC I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOC 410
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,3,8
IND I,20
NGI
LDC I,4
LOC 420
ADI
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOD A,1,328
CHK A,-1,0
STR A,2,412
MST 2,12,12
LDC I,23
CHK I,0,285
LOC 430
PAR I
LDA 2,72
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 1,468
PAR A
LOD A,2,412
LOC 440
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
MST 2,4,4
LDC I,34
CHK I,32,39
PAR I
CUP P,2,FREEG079
MST 2,4,4
LDC I,0
LOC 450
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LDC I,0
INC I,1
CHK I,0,31
PAR I
CUP P,2,FREER082
MST 2,4,4
LOC 460
LDC I,0
INC I,1
INC I,1
CHK I,0,31
PAR I
CUP P,2,FREER082
L12 LAB
UJP L5
L13 LAB
LDA 1,39928
LOD I,1,5032
CHK J,0,8
LOC 470
IXA 48
STR A,3,8
LOD A,3,8
IND I,0
LOD I,1,52
NEQ I
FJP L14
MST 2,4,4
LDC I,61
CHK I,0,68
LOC 480
PAR I
CUP P,2,ERROR005
L14 LAB
LOD I,1,52
LDC I,14
NEQ I
FJP L15
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
LOC 490
CHK I,0,31
PAR I
LOD A,3,8
IND I,20
NGI
LDC I,0
ADI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
LOC 500
MST 2,12,12
LDA 1,31060
LOD I,1,52
CHK J,0,15
IXA 4
IND I,0
CHK I,0,285
PAR I
LDA 1,4748
PAR A
LOC 510
LDA 2,184
PAR A
CUP P,6,EMITX077
L15 LAB
MST 2,8,8
LDA 2,128
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOC 520
LOD B,1,305
FJP L16
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LDC I,4
NGI
LOC 530
LOD A,3,8
IND I,20
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
MST 2,8,8
LDA 2,240
PAR A
LDC I,33
LOC 540
LDC I,4
MPI
CHK I,0,1073741823
PAR I
CUP P,4,ADDR$075
LOD A,1,328
CHK A,-1,0
STR A,2,412
MST 2,12,12
LDC I,75
LOC 550
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 1,468
PAR A
LOC 560
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOC 570
LDC I,4
NGI
LOD A,3,8
IND I,20
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOD A,1,328
CHK A,-1,0
LOC 580
STR A,2,412
MST 2,12,12
LDC I,164
CHK I,0,285
PAR I
LDA 2,128
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOC 590
MST 2,8,8
LDA 1,468
PAR A
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
UJP L17
L16 LAB
MST 2,12,12
LDA 2,184
LOC 600
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,3,8
IND I,20
NGI
CHK I,-16777216,16777215
PAR I
CUP P,6,EXTEN073
LOC 610
LOD A,1,328
CHK A,-1,0
STR A,2,412
MST 2,12,12
LDC I,164
CHK I,0,285
PAR I
LDA 2,128
PAR A
LDA 2,184
LOC 620
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 1,468
PAR A
LOD A,2,412
CHK A,-1,0
PAR A
CUP P,4,ADD$C050
L17 LAB
UJP L5
L18 LAB
LOC 630
LOD I,1,39924
LDC I,1
ADI
CHK I,0,15
STR I,1,39924
LOD I,1,39924
LDC I,15
GRT I
FJP L19
MST 2,4,4
LOC 640
LDC I,18
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L20
L19 LAB
LDA 1,39476
LOD I,1,39924
CHK J,0,15
IXA 28
STR A,3,8
LOC 650
LOD A,3,8
LOD I,1,72
CHK I,1,8
STO I
LOD A,3,8
INC A,4
LOD I,1,39472
CHK I,-1,30
STO I
LOD A,3,8
LOC 660
INC A,8
MST 2,0,0
CUP I,0,CURRE086
CHK I,0,10
STO I
LOD A,3,8
INC A,16
LOD I,1,68
STO I
LOD A,3,8
LOC 670
INC A,12
LOD I,1,64
STO I
LOD A,3,8
INC A,24
LOD A,1,328
CHK A,-1,0
STO A
LDA 1,39476
LOD I,1,39924
LOC 680
LDC I,1
SBI
CHK J,0,15
IXA 28
IND I,20
STR I,2,532
LDA 1,39476
LOD I,1,39924
LDC I,1
SBI
LOC 690
CHK J,0,15
IXA 28
IND I,4
LDC I,1
ADI
CHK I,-1,30
STR I,2,388
LOD I,1,39472
CHK I,-1,30
STR I,3,8
LOC 700
LOD I,2,388
LOD I,3,8
LEQ I
FJP L22
L21 LAB
LDA 1,35760
LOD I,2,388
CHK J,-1,30
INC I,1
IXA 116
STR A,3,12
LOC 710
LOD A,3,12
IND I,72
LDC I,0
GRT I
FJP L23
LOD A,3,12
IND I,4
LDC I,5
EQU I
LOD A,3,12
LOC 720
IND I,8
LDC I,1
EQU I
AND
FJP L24
LOD I,2,532
LDC I,4
ADI
STR I,2,532
MST 2,12,12
LOC 730
LDA 2,240
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
IND I,20
LOC 740
NGI
LOD I,2,532
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,8,8
LDA 2,128
PAR A
LOD A,3,12
LOC 750
IND I,88
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,240
PAR A
LOC 760
LDA 2,128
PAR A
CUP P,6,EMITX077
UJP L25
L24 LAB
LDA 1,30932
LOD A,3,12
IND I,4
CHK J,0,15
IXA 1
IND B,0
LOC 770
FJP L26
LOD I,2,532
LDC I,8
ADI
STR I,2,532
UJP L27
L26 LAB
LOD I,2,532
LDC I,4
ADI
STR I,2,532
L27 LAB
LOC 780
MST 2,12,12
LDA 2,240
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
LOC 790
IND I,20
NGI
LOD I,2,532
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,8,8
LDA 2,240
PAR A
LOC 800
LOD I,2,388
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,DATUM117
NOT
LOC 810
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,DATUM118
NOT
AND
FJP L28
LDA 1,30932
LOD A,3,12
LOC 820
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L29
MST 2,0,0
CUP P,0,FINDR083
UJP L30
L29 LAB
MST 2,0,0
CUP P,0,FINDR084
L30 LAB
LOC 830
MST 2,16,16
LOD I,2,388
CHK I,-1,30
PAR I
LOD A,3,12
IND A,0
CHK A,-1,0
PAR A
LOD A,3,12
IND I,4
LOC 840
CHK I,0,15
PAR I
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,8,REG$D113
L28 LAB
L25 LAB
L23 LAB
LOD I,2,388
LOD I,3,8
NEQ I
FJP L22
LOC 850
LOD I,2,388
INC I,1
CHK I,-1,30
STR I,2,388
UJP L21
L22 LAB
MST 2,0,0
CUP P,0,FREE$095
LDA 1,39476
LOD I,1,39924
CHK J,0,15
LOC 860
IXA 28
STR A,3,8
LOD A,3,8
IND I,12
LDC I,4
DVI
CHK I,0,10
STR I,2,528
LOD A,3,8
IND I,8
LOC 870
LOD I,2,528
LES I
FJP L31
MST 2,4,4
LOD I,2,528
CHK I,0,10
PAR I
CUP P,2,RESER089
L31 LAB
LOD A,3,8
INC A,20
LOC 880
LOD I,2,532
STO I
LOD I,2,532
LOD I,1,464
GRT I
FJP L32
LOD I,2,532
STR I,1,464
L32 LAB
L20 LAB
UJP L5
L33 LAB
MST 2,0,0
LOC 890
CUP P,0,CALLS199
UJP L5
L34 LAB
MST 2,8,8
LOD I,1,39472
CHK I,-1,30
PAR I
LOD I,1,52
CHK I,0,15
PAR I
CUP P,4,COERC114
LOC 900
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,4
LDC I,5
EQU I
FJP L35
LDA 1,35760
LOC 910
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND I,8
LDC I,1
EQU I
FJP L36
MST 2,4,4
LOD I,1,39472
LOC 920
CHK I,-1,30
PAR I
CUP P,2,BJUMP120
L36 LAB
L35 LAB
UJP L5
L2 DEF 7
L3 DEF 44
L4 LAB
UJP L33
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 930
UJP L6
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 940
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
LOC 950
UJP L5
UJP L5
UJP L18
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L5
UJP L34
LOC 960
UJP L5
UJP L13
L5 LAB
RET P
L1 DEF 16
SST P CASE1219 3 0 0 0 0
LOC 0
CASE1219 ENT P,3,L1 CASE10 1 1 1
LOD I,1,44
ORD
CHK I,0,72
XJP L2
L6 LAB
LDA 1,39476
LOD I,1,39924
CHK J,0,15
IXA 28
STR A,3,8
LOC 10
LDA 1,39928
LOD I,1,5032
CHK J,0,8
IXA 48
STR A,3,12
LOD A,3,8
IND I,4
LDC I,1
ADI
CHK I,-1,30
LOC 20
STR I,2,384
LOD A,3,8
IND A,24
CHK A,-1,0
STR A,2,356
LDC I,0
CHK I,0,34359738367
STR I,2,524
LOD A,3,12
IND I,28
LOC 30
LDC I,4
DVI
LDC I,1
SBI
CHK I,-1,9
STR I,2,520
LOD A,3,8
IND I,12
LDC I,4
DVI
LOC 40
LDC I,1
SBI
CHK I,-1,9
STR I,2,516
LOD A,3,12
IND I,28
LDC I,0
GRT I
FJP L7
L8 LAB
LOD I,2,524
LOC 50
LOD I,2,520
LEQ I
LOD I,2,524
LOD I,2,516
LEQ I
AND
LOD I,2,384
LOD I,1,39472
LEQ I
AND
LOC 60
FJP L9
LDA 1,35760
LOD I,2,384
CHK J,-1,30
INC I,1
IXA 116
STR A,3,16
MST 2,12,12
LDA 2,240
PAR A
LOC 70
LDA 1,35500
LOD I,1,5032
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
PAR I
LOD A,3,12
IND I,24
LOC 80
NGI
LOD A,3,12
IND I,40
SBI
LOD A,3,12
IND I,44
SBI
LOD I,2,524
LDC I,4
MPI
LOC 90
ADI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,8,8
LOD I,2,384
CHK I,-1,30
PAR I
LOD I,2,524
CHK I,0,34359738367
LOC 100
PAR I
CUP P,4,PARMR123
LDA 1,30948
LOD A,3,16
IND I,4
CHK J,0,15
IXA 1
IND B,0
MST 2,4,4
LOD I,2,384
LOC 110
CHK I,-1,30
PAR I
CUP B,2,DATUM116
LDA 1,30932
LOD A,3,16
IND I,4
CHK J,0,15
IXA 1
IND B,0
NOT
LOC 120
AND
IOR
FJP L10
MST 2,12,12
LDA 2,240
PAR A
LDA 1,35532
LOD I,2,524
CHK J,0,9
IXA 4
LOC 130
IND I,0
CHK I,0,31
PAR I
LOD I,2,384
CHK I,-1,30
PAR I
CUP P,6,SLR$Q139
UJP L11
L10 LAB
MST 2,8,8
LDA 2,128
LOC 140
PAR A
LDA 1,35532
LOD I,2,524
CHK J,0,9
IXA 4
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
LDA 1,30932
LOC 150
LOD A,3,16
IND I,4
CHK J,0,15
IXA 1
IND B,0
LOD I,2,524
LOD I,2,520
EQU I
NOT
AND
LOC 160
FJP L12
LDC I,82
CHK I,0,285
STR I,2,8
UJP L13
L12 LAB
LDC I,75
CHK I,0,285
STR I,2,8
L13 LAB
MST 2,12,12
LOD I,2,8
LOC 170
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,128
PAR A
CUP P,6,EMITX077
MST 2,8,8
LDA 2,128
PAR A
LOC 180
LOD I,2,384
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
L11 LAB
MST 2,4,4
LOD I,2,384
CHK I,-1,30
PAR I
CUP P,2,FREED090
LDA 1,30932
LOC 190
LOD A,3,16
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L14
LOD I,2,524
LDC I,2
ADI
CHK I,0,34359738367
LOC 200
STR I,2,524
UJP L15
L14 LAB
LOD I,2,524
LDC I,1
ADI
CHK I,0,34359738367
STR I,2,524
L15 LAB
LOD I,2,384
LDC I,1
ADI
LOC 210
CHK I,-1,30
STR I,2,384
UJP L8
L9 LAB
LOD I,2,524
CHK I,0,10
STR I,2,512
LOD I,2,512
LOD I,2,520
LEQ I
FJP L16
LOC 220
MST 2,12,12
LDA 2,240
PAR A
LDA 1,35500
LOD I,1,5032
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
LOC 230
PAR I
LOD A,3,12
IND I,24
NGI
LOD A,3,12
IND I,40
SBI
LOD A,3,12
IND I,44
SBI
LOC 240
LOD I,2,512
LDC I,4
MPI
ADI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,8,8
LDA 2,128
PAR A
LOC 250
LDA 1,35532
LOD I,2,512
CHK J,0,9
IXA 4
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 1,31380
LOC 260
LOD I,2,520
LOD I,2,512
SBI
LDC I,1
ADI
CHK J,1,32
DEC I,1
IXA 4
IND I,0
CHK I,0,285
LOC 270
PAR I
LDA 2,240
PAR A
LDA 2,128
PAR A
CUP P,6,EMITX077
LOD I,2,520
LDC I,1
ADI
CHK I,0,10
LOC 280
STR I,2,512
L16 LAB
L7 LAB
L17 LAB
LOD I,2,524
LOD I,2,516
LEQ I
LOD I,2,384
LOD I,1,39472
LEQ I
AND
FJP L18
MST 2,8,8
LOC 290
LDA 2,128
PAR A
LDA 1,35532
LOD I,2,524
CHK J,0,9
IXA 4
IND I,0
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOC 300
MST 2,8,8
LOD I,2,384
CHK I,-1,30
PAR I
LOD I,2,524
CHK I,0,34359738367
PAR I
CUP P,4,PARMR123
MST 2,8,8
LDA 2,128
LOC 310
PAR A
LOD I,2,384
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
LDA 1,30932
LDA 1,35760
LOD I,2,384
CHK J,-1,30
INC I,1
LOC 320
IXA 116
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L19
LOD I,2,524
LDC I,2
ADI
CHK I,0,34359738367
LOC 330
STR I,2,524
UJP L20
L19 LAB
LOD I,2,524
LDC I,1
ADI
CHK I,0,34359738367
STR I,2,524
L20 LAB
MST 2,4,4
LOD I,2,384
CHK I,-1,30
LOC 340
PAR I
CUP P,2,FREED090
LOD I,2,384
LDC I,1
ADI
CHK I,-1,30
STR I,2,384
UJP L17
L18 LAB
LOD I,2,524
LOD I,2,516
LOC 350
LDC I,1
ADI
GRT I
FJP L21
MST 2,4,4
LDC I,52
CHK I,0,68
PAR I
CUP P,2,ERROR005
L21 LAB
LOD I,2,384
LOC 360
LOD I,1,39472
LEQ I
FJP L22
LOD A,3,8
IND I,16
LOD A,3,8
IND I,12
SBI
LDC I,2
LDC I,4
LOC 370
MPI
ADI
LDC I,4
ADI
STR I,2,468
MST 2,8,8
LDA 2,184
PAR A
LOD I,2,468
PAR I
LOC 380
CUP P,4,IMM$O064
MST 2,12,12
LDC I,10
CHK I,0,285
PAR I
LDA 1,4804
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
LOC 390
LOD A,3,8
IND I,16
NGI
LOD I,2,524
LDC I,4
MPI
ADI
STR I,2,532
L23 LAB
LOD I,2,384
LOD I,1,39472
LOC 400
LEQ I
FJP L24
MST 2,8,8
LOD I,2,384
CHK I,-1,30
PAR I
LOD I,2,524
CHK I,0,34359738367
PAR I
CUP P,4,PARMR123
LOC 410
MST 2,12,12
LDA 2,240
PAR A
LDC I,30
CHK I,0,31
PAR I
LOD I,2,532
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
LOC 420
MST 2,8,8
LDA 2,240
PAR A
LOD I,2,384
CHK I,-1,30
PAR I
CUP P,4,MOVE$110
MST 2,4,4
LOD I,2,384
CHK I,-1,30
LOC 430
PAR I
CUP P,2,FREED090
LDA 1,30932
LDA 1,35760
LOD I,2,384
CHK J,-1,30
INC I,1
IXA 116
IND I,4
CHK J,0,15
LOC 440
IXA 1
IND B,0
FJP L25
LOD I,2,524
LDC I,2
ADI
CHK I,0,34359738367
STR I,2,524
LOD I,2,532
LDC I,8
LOC 450
ADI
STR I,2,532
UJP L26
L25 LAB
LOD I,2,524
LDC I,1
ADI
CHK I,0,34359738367
STR I,2,524
LOD I,2,532
LDC I,4
LOC 460
ADI
STR I,2,532
L26 LAB
LOD I,2,384
LDC I,1
ADI
CHK I,-1,30
STR I,2,384
UJP L23
L24 LAB
MST 2,8,8
LDA 2,184
LOC 470
PAR A
LOD I,2,468
PAR I
CUP P,4,IMM$O064
MST 2,16,16
LDC I,265
CHK I,0,285
PAR I
LDC I,0
CHK I,0,3
LOC 480
PAR I
LDA 1,4804
PAR A
LDA 2,184
PAR A
CUP P,8,EMITT106
L22 LAB
L27 LAB
LOD I,1,39472
LOD A,3,8
IND I,4
GRT I
LOC 490
FJP L28
MST 2,0,0
CUP P,0,POPTO129
UJP L27
L28 LAB
LOD I,2,524
LOD A,3,8
IND I,16
LDC I,4
DVI
NEQ I
LOC 500
FJP L29
LOD I,2,524
LOD A,3,8
IND I,16
LDC I,4
DVI
LES I
FJP L30
MST 2,4,4
LDC I,24
LOC 510
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L31
L30 LAB
MST 2,4,4
LDC I,39
CHK I,0,68
PAR I
CUP P,2,ERROR005
L31 LAB
L29 LAB
MST 2,8,8
LOC 520
LDA 2,128
PAR A
LDA 1,35500
LOD A,3,8
IND I,0
CHK J,1,8
DEC I,1
IXA 4
IND I,0
CHK I,0,31
LOC 530
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 2,184
PAR A
LDC I,3
CHK I,0,31
PAR I
LOD I,1,4860
CHK I,0,1073741823
LOC 540
PAR I
CUP P,6,EXT$R074
LDC I,4
CHK I,0,5
STR I,2,232
MST 2,8,8
LDA 2,236
PAR A
LDA 1,100
PAR A
LOC 550
CUP P,4,UPD$P132
MST 2,20,20
LDC I,65
CHK I,0,285
PAR I
LDC I,0
CHK I,0,1
PAR I
LDA 2,128
PAR A
LOC 560
LDA 2,184
PAR A
LDC N
CHK A,-1,0
PAR A
CUP P,10,EMITJ105
MST 2,4,4
LOD A,3,8
IND I,8
CHK I,0,10
LOC 570
PAR I
CUP P,2,RESER089
LDA 1,39476
LOD I,1,39924
LDC I,1
SBI
CHK J,0,15
IXA 28
STR A,3,8
LDA 1,39928
LOC 580
LOD I,1,5032
CHK J,0,8
IXA 48
STR A,3,12
LOD A,3,8
IND I,20
STR I,2,532
LDC B,0
STR B,2,540
LOD A,3,8
LOC 590
IND I,4
LDC I,1
ADI
CHK I,-1,30
STR I,2,388
LOD I,1,39472
CHK I,-1,30
STR I,3,16
LOD I,2,388
LOD I,3,16
LOC 600
LEQ I
FJP L33
L32 LAB
LDA 1,35760
LOD I,2,388
CHK J,-1,30
INC I,1
IXA 116
STR A,3,20
LOD A,3,20
IND I,72
LOC 610
LDC I,0
GRT I
FJP L34
LOD A,3,20
IND I,4
LDC I,5
EQU I
LOD A,3,20
IND I,8
LDC I,1
LOC 620
EQU I
AND
FJP L35
MST 2,8,8
LDA 2,128
PAR A
LOD A,3,20
IND I,88
CHK I,0,31
PAR I
LOC 630
CUP P,4,REG$O063
LOD I,2,532
LDC I,4
ADI
STR I,2,532
MST 2,4,4
LOD A,3,20
IND I,88
CHK I,0,31
PAR I
LOC 640
CUP P,2,ALLOC080
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,3,12
IND I,20
NGI
LOC 650
LOD I,2,532
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,12,12
LDC I,75
CHK I,0,285
PAR I
LDA 2,128
LOC 660
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
UJP L36
L35 LAB
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,DATUM117
LOC 670
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,DATUM118
IOR
NOT
FJP L37
MST 2,4,4
LCA 'PCUP 001'
LOC 680
PAR A
CUP P,2,ASSER003
L37 LAB
MST 2,12,12
LDA 2,364
PAR A
LDA 2,240
PAR A
LOD I,2,388
CHK I,-1,30
PAR I
LOC 690
CUP P,6,FIT$I109
LOD B,2,364
NOT
NOT
FJP L38
MST 2,4,4
LCA 'PCUP 002'
PAR A
CUP P,2,ASSER003
L38 LAB
LDA 1,30932
LOC 700
LOD A,3,20
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L39
LOD I,2,532
LDC I,2
LDC I,4
MPI
LOC 710
ADI
STR I,2,532
UJP L40
L39 LAB
LOD I,2,532
LDC I,4
ADI
STR I,2,532
L40 LAB
LOD I,1,52
LDC I,14
NEQ I
LOC 720
MST 2,4,4
LDA 2,240
PAR A
CUP B,2,IS$RT068
AND
FJP L41
LDC B,1
STR B,2,540
LOD I,2,388
CHK I,-1,30
LOC 730
STR I,2,544
LOD I,2,532
STR I,2,548
UJP L42
L41 LAB
MST 2,4,4
LOD I,2,388
CHK I,-1,30
PAR I
CUP B,2,DATUM117
FJP L43
LOC 740
LDA 1,30932
LOD A,3,20
IND I,4
CHK J,0,15
IXA 1
IND B,0
FJP L44
MST 2,4,4
LOD A,3,20
IND I,88
LOC 750
CHK I,0,31
PAR I
CUP P,2,ALLOC081
UJP L45
L44 LAB
MST 2,4,4
LOD A,3,20
IND I,88
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L45 LAB
L43 LAB
LOC 760
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
PAR I
LOD A,3,12
IND I,20
NGI
LOD I,2,532
LOC 770
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,12,12
LDA 1,31060
LOD A,3,20
IND I,4
CHK J,0,15
IXA 4
LOC 780
IND I,0
CHK I,0,285
PAR I
LDA 2,240
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
L42 LAB
L36 LAB
L34 LAB
LOD I,2,388
LOD I,3,16
LOC 790
NEQ I
FJP L33
LOD I,2,388
INC I,1
CHK I,-1,30
STR I,2,388
UJP L32
L33 LAB
LOD B,2,540
FJP L46
LDA 1,35760
LOC 800
LOD I,2,544
CHK J,-1,30
INC I,1
IXA 116
STR A,3,16
LDA 1,30932
LOD A,3,16
IND I,4
CHK J,0,15
IXA 1
LOC 810
IND B,0
FJP L47
MST 2,0,0
CUP P,0,FINDR083
LDC I,82
CHK I,0,285
STR I,2,12
UJP L48
L47 LAB
MST 2,0,0
CUP P,0,FINDR084
LOC 820
LDC I,75
CHK I,0,285
STR I,2,12
L48 LAB
LOD A,3,16
INC A,88
LOD I,1,35476
CHK I,0,31
STO I
MST 2,8,8
LDA 2,128
LOC 830
PAR A
LOD I,1,35476
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,12,12
LDA 2,184
PAR A
LOD I,1,5048
CHK I,0,31
LOC 840
PAR I
LOD A,3,12
IND I,20
NGI
LOD I,2,548
SBI
CHK I,-16777216,16777215
PAR I
CUP P,6,REGDI072
MST 2,12,12
LOC 850
LOD I,2,12
CHK I,0,285
PAR I
LDA 2,128
PAR A
LDA 2,184
PAR A
CUP P,6,EMITX077
L46 LAB
MST 2,0,0
CUP P,0,RESTO198
LOC 860
LOD I,1,52
LDC I,14
NEQ I
FJP L49
MST 2,0,0
CUP P,0,PUSHT128
LDA 1,30932
LOD I,1,52
CHK J,0,15
IXA 1
LOC 870
IND B,0
FJP L50
MST 2,4,4
LDC I,6
CHK I,0,31
PAR I
CUP P,2,ALLOC081
UJP L51
L50 LAB
MST 2,4,4
LDC I,6
LOC 880
CHK I,0,31
PAR I
CUP P,2,ALLOC080
L51 LAB
MST 2,16,16
LOD I,1,39472
CHK I,-1,30
PAR I
LOD A,2,356
CHK A,-1,0
PAR A
LOC 890
LOD I,1,52
CHK I,0,15
PAR I
LDC I,6
CHK I,0,31
PAR I
CUP P,8,REG$D113
LOD I,1,39472
CHK I,-1,30
STR I,1,35492
LOC 900
LDA 1,30932
LOD I,1,52
CHK J,0,15
IXA 1
IND B,0
STR B,1,35496
L49 LAB
LOD I,1,39924
LDC I,1
SBI
CHK I,0,15
LOC 910
STR I,1,39924
UJP L5
L2 DEF 8
L3 DEF 8
L4 LAB
UJP L6
L5 LAB
RET P
L1 DEF 24
LOC 0
ASMNX209 ENT P,2,L1 ASMNXTINST 1 1 1
LOD B,1,35757
FJP L2
LOD I,1,44
ORD
LDC I,63
LEQ I
FJP L3
LOD I,1,44
ORD
LOC 10
CHK S,0,63
LDC S,(4112,0,16640,1040)
INN
STR B,1,35757
UJP L4
L3 LAB
LDC B,0
STR B,1,35757
L4 LAB
L2 LAB
LOD I,1,44
ORD
LDC I,63
LOC 20
LEQ I
FJP L5
LOD I,1,44
ORD
CHK S,0,63
LDC S,(0,24592,0,16384)
INN
FJP L6
LDC I,3
CHK I,1,8
LOC 30
STR I,1,108
LOD I,1,44
LDC I,14
EQU I
FJP L7
LDA 1,100
LCA 'EOF '
MOV 8
UJP L8
L7 LAB
LOD I,1,44
LOC 40
LDC I,46
EQU I
FJP L9
LDA 1,100
LCA 'SAV '
MOV 8
UJP L10
L9 LAB
LOD I,1,44
LDC I,45
EQU I
LOC 50
FJP L11
LDA 1,100
LCA 'RST '
MOV 8
UJP L12
L11 LAB
LOD I,1,44
LDC I,36
EQU I
FJP L13
LDA 1,100
LOC 60
LCA 'NEW '
MOV 8
MST 2,0,0
CUP P,0,PUSHT128
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LDA 1,4576
LOC 70
MOV 116
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,2,564
LOD A,2,564
LOD A,1,328
CHK A,-1,0
LOC 80
STO A
LOD A,2,564
INC A,4
LDC I,10
CHK I,0,15
STO I
LOD A,2,564
INC A,64
LOD I,1,72
STO I
LOC 90
UJP L14
L13 LAB
LDC B,0
NOT
FJP L15
MST 2,4,4
LCA 'ASMNXTINS001'
PAR A
CUP P,2,ASSER003
L15 LAB
L14 LAB
L12 LAB
L10 LAB
L8 LAB
LDC I,7
CHK I,0,72
LOC 100
STR I,1,44
L6 LAB
L5 LAB
LOD I,1,44
ORD
CHK I,0,72
XJP L16
L20 LAB
MST 3,0,0
CUP P,0,CASE1210
UJP L19
L21 LAB
MST 3,0,0
CUP P,0,CASE2211
LOC 110
UJP L19
L22 LAB
MST 3,0,0
CUP P,0,CASE3212
UJP L19
L23 LAB
MST 3,0,0
CUP P,0,CASE4213
UJP L19
L24 LAB
MST 3,0,0
CUP P,0,CASE5214
UJP L19
L25 LAB
LOC 120
MST 3,0,0
CUP P,0,CASE6215
UJP L19
L26 LAB
MST 3,0,0
CUP P,0,CASE7216
UJP L19
L27 LAB
MST 3,0,0
CUP P,0,CASE8217
UJP L19
L28 LAB
MST 3,0,0
LOC 130
CUP P,0,CASE9218
UJP L19
L29 LAB
MST 3,0,0
CUP P,0,CASE1219
UJP L19
L30 LAB
MST 2,0,0
CUP P,0,PUSHT128
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 140
INC I,1
IXA 116
LDA 1,4576
MOV 116
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,2,564
LOC 150
LOD A,2,564
LOD A,1,328
CHK A,-1,0
STO A
LOD A,2,564
INC A,4
LOD I,1,52
CHK I,0,15
STO I
LOD I,1,52
LOC 160
ORD
CHK I,0,15
XJP L31
L35 LAB
LOD A,2,564
INC A,60
LDC I,1
STO I
LOD A,2,564
INC A,68
LDC I,0
LOC 170
CHK I,0,8
STO I
LOD A,2,564
INC A,64
LOD I,1,72
STO I
UJP L34
L36 LAB
LOD A,2,564
INC A,60
LDC I,1
LOC 180
STO I
LOD A,2,564
INC A,68
LDC I,0
CHK I,0,8
STO I
LOD A,2,564
INC A,64
LOD I,1,72
STO I
LOC 190
LOD A,2,564
INC A,8
LDC I,0
CHK I,0,1
STO I
UJP L34
L37 LAB
LOD A,2,564
INC A,52
LOD R,1,76
STO R
LOC 200
UJP L34
L38 LAB
UJP L34
L39 LAB
LOD A,2,564
INC A,44
LOD S,1,80
STO S
UJP L34
L40 LAB
MST 2,4,4
LDC I,29
CHK I,0,68
LOC 210
PAR I
CUP P,2,ERROR005
UJP L34
L31 DEF 2
L32 DEF 15
L33 LAB
UJP L40
UJP L40
UJP L38
UJP L36
UJP L35
UJP L39
UJP L40
LOC 220
UJP L40
UJP L35
UJP L40
UJP L40
UJP L37
UJP L40
UJP L40
L34 LAB
UJP L19
L41 LAB
MST 2,0,0
CUP P,0,PUSHT128
LOC 230
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LDA 1,4576
MOV 116
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 240
INC I,1
IXA 116
STR A,2,564
LOD A,2,564
LOD A,1,328
CHK A,-1,0
STO A
LOD A,2,564
INC A,4
LDC I,3
LOC 250
CHK I,0,15
STO I
LOD A,2,564
INC A,60
LDC I,1
STO I
LOD A,2,564
INC A,68
LDC I,0
CHK I,0,8
LOC 260
STO I
LOD A,2,564
INC A,64
LOD I,1,348
STO I
LOD I,1,348
LDC I,4
MOD
LDC I,9
MPI
LOC 270
CHK I,0,35
STR I,2,508
LDC I,1
STR I,2,504
LOD I,1,276
STR I,2,568
LOD I,2,504
LOD I,2,568
LEQ I
FJP L43
L42 LAB
LOC 280
LOD I,2,508
LDC I,0
EQU I
FJP L44
MST 2,8,8
LDA 1,336
PAR A
LDA 1,352
PAR A
CUP P,4,EMIT$103
L44 LAB
LOC 290
MST 2,16,16
LOD A,1,352
CHK A,0,0
INC A,4
PAR A
LOD I,2,508
CHK I,0,35
PAR I
LDC I,9
CHK I,1,36
LOC 300
PAR I
LDA 1,124
LOD I,2,504
CHK J,1,150
DEC I,1
IXA 1
IND C,0
ORD
LDC I,0
SBI
LOC 310
PAR I
CUP P,8,PUTFI022
LOD I,2,508
LDC I,9
ADI
LDC I,36
MOD
CHK I,0,35
STR I,2,508
LOD I,2,504
LOC 320
LOD I,2,568
NEQ I
FJP L43
LOD I,2,504
INC I,1
STR I,2,504
UJP L42
L43 LAB
LOD I,1,348
LOD I,1,276
ADI
LOC 330
STR I,1,348
UJP L19
L45 LAB
LOD I,1,44
LDC I,29
EQU I
FJP L46
LDC I,31
CHK I,0,72
STR I,1,44
LOD I,1,72
LOC 340
STR I,1,68
LDC I,1
STR I,1,72
L46 LAB
MST 2,0,0
CUP P,0,PUSHT128
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LOC 350
LDA 1,4576
MOV 116
LOD I,1,68
LDA 1,30740
LOD I,1,52
CHK J,0,15
IXA 4
IND I,0
MOD
LDC I,0
LOC 360
NEQ I
FJP L47
MST 2,4,4
LDC I,3
CHK I,0,68
PAR I
CUP P,2,ERROR005
L47 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
LOC 370
INC I,1
IXA 116
STR A,2,564
LOD A,2,564
LOD A,1,328
CHK A,-1,0
STO A
LOD A,2,564
INC A,4
LOD I,1,52
LOC 380
CHK I,0,15
STO I
LOD A,2,564
INC A,72
LDC I,1
CHK I,0,2
STO I
LOD A,2,564
INC A,80
LDC I,1
LOC 390
CHK I,1,2
STO I
LOD A,2,564
INC A,84
LDC I,1
STO I
LOD A,2,564
INC A,92
LOD I,1,72
CHK I,0,8
LOC 400
STO I
LOD A,2,564
INC A,88
LOD I,1,68
STO I
MST 2,4,4
LOD A,2,564
INC A,84
PAR A
CUP P,2,TRANS124
LOC 410
LOD I,1,52
LDC I,5
EQU I
FJP L48
LOD A,2,564
INC A,8
LDC I,0
CHK I,0,1
STO I
L48 LAB
UJP L19
L49 LAB
LOC 420
LOD I,1,44
LDC I,25
EQU I
FJP L50
LDC I,27
CHK I,0,72
STR I,1,44
LOD I,1,72
STR I,1,68
LDC I,1
LOC 430
STR I,1,72
L50 LAB
MST 2,0,0
CUP P,0,PUSHT128
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
LDA 1,4576
MOV 116
LOC 440
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,2,564
LOD A,2,564
LOD A,1,328
CHK A,-1,0
STO A
LOC 450
LOD A,2,564
INC A,4
LDC I,2
CHK I,0,15
STO I
LOD A,2,564
INC A,60
LDC I,1
STO I
LOD A,2,564
LOC 460
INC A,68
LOD I,1,72
CHK I,0,8
STO I
LOD A,2,564
INC A,64
LOD I,1,68
STO I
MST 2,4,4
LOD A,2,564
LOC 470
INC A,60
PAR A
CUP P,2,TRANS124
UJP L19
L51 LAB
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
STR A,2,564
LOC 480
LOD A,2,564
IND I,4
LDC I,2
NEQ I
FJP L52
LOD A,2,564
IND I,4
LDC I,4
EQU I
FJP L53
LOC 490
MST 2,4,4
LDC I,47
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L54
L53 LAB
LOD A,2,564
IND I,4
LDC I,3
EQU I
LOC 500
FJP L55
MST 2,4,4
LDC I,37
CHK I,0,68
PAR I
CUP P,2,ERROR005
UJP L56
L55 LAB
MST 2,4,4
LDC I,44
CHK I,0,68
LOC 510
PAR I
CUP P,2,ERROR005
L56 LAB
L54 LAB
L52 LAB
LOD I,1,72
LDC I,0
EQU I
FJP L57
LDC I,1
CHK I,0,2
STR I,2,460
UJP L58
L57 LAB
LOC 520
LDC I,0
CHK I,0,2
STR I,2,460
L58 LAB
L59 LAB
LOD A,2,564
IND I,56
LOD I,2,460
GRT I
FJP L60
MST 2,4,4
LOD I,1,39472
LOC 530
CHK I,-1,30
PAR I
CUP P,2,SIMPL111
UJP L59
L60 LAB
LOD A,2,564
IND I,60
LDC I,0
EQU I
FJP L61
MST 2,4,4
LOC 540
LDC I,21
CHK I,0,68
PAR I
CUP P,2,ERROR005
L61 LAB
LOD A,2,564
INC A,64
LOD A,2,564
IND I,64
LOD I,1,72
ADI
LOC 550
STO I
LOD A,2,564
IND I,72
LDC I,0
EQU I
FJP L62
LOD A,2,564
INC A,72
LDC I,1
CHK I,0,2
LOC 560
STO I
LOD A,2,564
INC A,80
LDC I,1
CHK I,1,2
STO I
LOD A,2,564
INC A,84
LOD A,2,564
INC A,60
LOC 570
MOV 12
LOD A,2,564
INC A,60
LDA 1,4692
MOV 12
UJP L63
L62 LAB
LOD A,2,564
IND I,72
LDC I,1
EQU I
LOC 580
LOD A,2,564
INC A,60
LDA 1,4692
EQU M,12
AND
FJP L64
LOD A,2,564
IND I,76
LDC I,0
NEQ I
LOC 590
FJP L65
MST 2,4,4
LDC I,20
CHK I,0,68
PAR I
CUP P,2,ERROR005
L65 LAB
LOD A,2,564
IND I,80
LDC I,1
EQU I
LOC 600
FJP L66
LOD A,2,564
INC A,80
LDC I,2
CHK I,1,2
STO I
UJP L67
L66 LAB
LOD A,2,564
INC A,56
LOD A,2,564
LOC 610
IND I,56
INC I,1
CHK I,0,2
STO I
L67 LAB
UJP L68
L64 LAB
LOD A,2,564
INC A,56
LOD A,2,564
IND I,56
INC I,1
LOC 620
CHK I,0,2
STO I
L68 LAB
L63 LAB
LOD A,2,564
INC A,4
LOD I,1,52
CHK I,0,15
STO I
UJP L19
L69 LAB
MST 2,8,8
LOD I,1,39472
LOC 630
LDC I,1
SBI
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,4,STORE141
MST 2,4,4
LOD I,1,39472
LOC 640
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
LOC 650
MST 2,0,0
CUP P,0,POPTO129
UJP L19
L70 LAB
LOD I,1,44
LDC I,51
EQU I
FJP L71
LDC I,55
CHK I,0,72
STR I,1,44
LOC 660
LOD I,1,72
STR I,1,68
LDC I,1
STR I,1,72
L71 LAB
LOD I,1,68
LDA 1,30740
LOD I,1,52
CHK J,0,15
IXA 4
IND I,0
LOC 670
MOD
LDC I,0
NEQ I
FJP L72
MST 2,4,4
LDC I,3
CHK I,0,68
PAR I
CUP P,2,ERROR005
L72 LAB
LDA 1,35760
LOC 680
LDC I,-1
CHK J,-1,30
INC I,1
IXA 116
LDA 1,4576
MOV 116
LDA 1,35760
LDC I,-1
CHK J,-1,30
INC I,1
LOC 690
IXA 116
STR A,2,564
LOD A,2,564
LDA 1,35760
LOD I,1,39472
CHK J,-1,30
INC I,1
IXA 116
IND A,0
CHK A,-1,0
LOC 700
STO A
LOD A,2,564
INC A,4
LDC I,2
CHK I,0,15
STO I
LOD A,2,564
INC A,60
LDC I,1
STO I
LOC 710
LOD A,2,564
INC A,68
LOD I,1,72
CHK I,0,8
STO I
LOD A,2,564
INC A,64
LOD I,1,68
STO I
MST 2,4,4
LOC 720
LOD A,2,564
INC A,60
PAR A
CUP P,2,TRANS124
MST 2,8,8
LDC I,-1
CHK I,-1,30
PAR I
LOD I,1,39472
CHK I,-1,30
LOC 730
PAR I
CUP P,4,STORE141
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,FREED090
MST 2,0,0
CUP P,0,POPTO129
MST 2,4,4
LOC 740
LDC I,-1
CHK I,-1,30
PAR I
CUP P,2,FREED090
UJP L19
L16 DEF 0
L17 DEF 72
L18 LAB
UJP L20
UJP L20
UJP L21
UJP L24
UJP L25
LOC 750
UJP L27
UJP L20
UJP L28
UJP L29
UJP L20
UJP L27
UJP L25
UJP L22
UJP L28
UJP L19
LOC 760
UJP L27
UJP L20
UJP L20
UJP L20
UJP L51
UJP L25
UJP L25
UJP L24
UJP L26
UJP L26
LOC 770
UJP L49
UJP L41
UJP L49
UJP L30
UJP L45
UJP L26
UJP L45
UJP L22
UJP L26
UJP L22
LOC 780
UJP L28
UJP L19
UJP L20
UJP L20
UJP L21
UJP L21
UJP L20
UJP L28
UJP L20
UJP L28
LOC 790
UJP L19
UJP L19
UJP L21
UJP L25
UJP L20
UJP L20
UJP L70
UJP L27
UJP L69
UJP L27
LOC 800
UJP L70
UJP L20
UJP L27
UJP L27
UJP L20
UJP L27
UJP L25
UJP L27
UJP L23
UJP L23
LOC 810
UJP L23
UJP L23
UJP L23
UJP L23
UJP L23
UJP L23
UJP L23
UJP L23
L19 LAB
LOD I,1,44
ORD
LOC 820
LDC I,63
LEQ I
FJP L74
LOD I,1,44
ORD
CHK S,0,63
LDC S,(20648,2,256,32768)
INN
LOD I,1,39472
LDC I,1
LOC 830
LDC I,1
SBI
NEQ I
AND
FJP L75
MST 2,4,4
LDC I,63
CHK I,0,68
PAR I
CUP P,2,ERROR005
L75 LAB
L74 LAB
LOC 840
RET P
L1 DEF 572
SST P READN220 2 0 0 4 0
SST P READN221 3 4 0 8 4
LOC 0
READN221 ENT P,3,L1 READNAM 1 1 1
L2 LAB
LOD C,1,12
LDC C,' '
EQU C
LOD C,1,12
LDC C,','
EQU C
IOR
FJP L3
LDA 1,12
LOC 10
CSP SIO
CSP GET
CSP EIO
UJP L2
L3 LAB
LOD A,3,8
LCA ' '
MOV 8
LDC I,0
CHK I,0,8
STR I,3,12
L4 LAB
LOC 20
LOD I,3,12
LDC I,1
ADI
CHK I,0,8
STR I,3,12
LDA 1,12
CSP SIO
LDA 3,16
CSP RDC
CSP EIO
LOC 30
LOD A,3,8
LOD I,3,12
CHK J,1,8
DEC I,1
IXA 1
LOD C,3,16
CHK I,0,255
STO C
LOD I,3,12
LDC I,8
LOC 40
EQU I
LOD C,1,12
LDC C,' '
EQU C
IOR
LOD C,1,12
LDC C,','
EQU C
IOR
FJP L4
L5 LAB
LOC 50
LOD C,1,12
LDC C,' '
NEQ C
LOD C,1,12
LDC C,','
NEQ C
AND
FJP L6
LDA 1,12
CSP SIO
LOC 60
CSP GET
CSP EIO
UJP L5
L6 LAB
LOD A,3,8
INC A,8
LOD I,3,12
CHK I,1,8
STO I
RET P
L1 DEF 20
SST P READT222 3 4 0 4 4
LOC 0
READT222 ENT P,3,L1 READTYP 1 1 1
L2 LAB
LDA 1,12
CSP SIO
LDA 3,12
CSP RDC
CSP EIO
LOD C,3,12
LDC C,' '
NEQ C
LOD C,3,12
LOC 10
LDC C,','
NEQ C
AND
FJP L2
LOD A,3,8
LOD I,1,4324
CHK I,0,15
STO I
L3 LAB
LOD A,3,8
IND I,0
LOC 20
LOD I,1,4320
LES I
LDA 1,30724
LOD A,3,8
IND I,0
CHK J,0,15
IXA 1
IND C,0
LOD C,3,12
NEQ C
LOC 30
AND
FJP L4
LOD A,3,8
LOD A,3,8
IND I,0
INC I,1
CHK I,0,15
STO I
UJP L3
L4 LAB
LDA 1,30724
LOC 40
LOD A,3,8
IND I,0
CHK J,0,15
IXA 1
IND C,0
LOD C,3,12
NEQ C
FJP L5
MST 2,4,4
LDC I,33
LOC 50
CHK I,0,68
PAR I
CUP P,2,ERROR005
L5 LAB
RET P
L1 DEF 16
SST P READI223 3 4 0 0 4
LOC 0
READI223 ENT P,3,L1 READINT 1 1 1
L2 LAB
LOD C,1,12
LDC C,' '
EQU C
LOD C,1,12
LDC C,','
EQU C
IOR
FJP L3
LDA 1,12
LOC 10
CSP SIO
CSP GET
CSP EIO
UJP L2
L3 LAB
LDA 1,12
CSP SIO
LOD A,3,8
CSP RDI
CSP EIO
RET P
L1 DEF 12
SST P READR224 3 4 0 0 4
LOC 0
READR224 ENT P,3,L1 READREAL 1 1 1
L2 LAB
LOD C,1,12
LDC C,' '
EQU C
LOD C,1,12
LDC C,','
EQU C
IOR
FJP L3
LDA 1,12
LOC 10
CSP SIO
CSP GET
CSP EIO
UJP L2
L3 LAB
LDA 1,12
CSP SIO
LOD A,3,8
CSP RDR
CSP EIO
RET P
L1 DEF 12
SST P READS225 3 4 0 28 4
LOC 0
READS225 ENT P,3,L1 READSET 1 1 1
L2 LAB
LOD C,1,12
LDC C,'('
NEQ C
FJP L3
LDA 1,12
CSP SIO
CSP GET
CSP EIO
UJP L2
L3 LAB
LOC 10
LDA 1,12
CSP SIO
CSP GET
CSP EIO
LDC I,1
STR I,3,20
LDC I,4
STR I,3,40
LOD I,3,20
LOD I,3,40
LOC 20
LEQ I
FJP L5
L4 LAB
MST 3,4,4
LDA 3,24
LOD I,3,20
CHK J,1,4
DEC I,1
IXA 4
PAR A
CUP P,2,READI223
LOC 30
LOD I,3,20
LOD I,3,40
NEQ I
FJP L5
LOD I,3,20
INC I,1
STR I,3,20
UJP L4
L5 LAB
LOD A,3,8
LDC S,(0,0,0,0)
LOC 40
STO S
LDC I,0
STR I,3,12
LDC I,4
STR I,3,20
LDC I,1
STR I,3,40
LOD I,3,20
LOD I,3,40
GEQ I
LOC 50
FJP L7
L6 LAB
LDC I,1
STR I,3,16
LDC I,16
STR I,3,44
LOD I,3,16
LOD I,3,44
LEQ I
FJP L9
L8 LAB
LDA 3,24
LOC 60
LOD I,3,20
CHK J,1,4
DEC I,1
IXA 4
IND I,0
ODD
FJP L10
LOD A,3,8
LOD A,3,8
IND S,0
LOC 70
LOD I,3,12
CHK S,0,63
SGS
UNI
STO S
L10 LAB
LDA 3,24
LOD I,3,20
CHK J,1,4
DEC I,1
IXA 4
LOC 80
LDA 3,24
LOD I,3,20
CHK J,1,4
DEC I,1
IXA 4
IND I,0
LDC I,2
DVI
STO I
LOD I,3,12
LOC 90
LDC I,1
ADI
STR I,3,12
LOD I,3,16
LOD I,3,44
NEQ I
FJP L9
LOD I,3,16
INC I,1
STR I,3,16
LOC 100
UJP L8
L9 LAB
LOD I,3,20
LOD I,3,40
NEQ I
FJP L7
LOD I,3,20
DEC I,1
STR I,3,20
UJP L6
L7 LAB
RET P
L1 DEF 48
LOC 0
READN220 ENT P,2,L1 READNXTINST 1 1 1
LOD C,1,12
LDC C,' '
NEQ C
FJP L2
MST 3,4,4
LDA 1,112
PAR A
CUP P,2,READN221
L2 LAB
L3 LAB
LDA 1,12
LOC 10
CSP SIO
CSP GET
CSP EIO
LOD C,1,12
LDC C,' '
NEQ C
FJP L3
LDA 1,12
CSP SIO
LDA 2,8
LOC 20
CSP RDC
CSP EIO
LDA 1,48
LDC I,1
CHK J,1,3
DEC I,1
IXA 1
LOD C,2,8
CHK I,0,255
STO C
LOC 30
LDA 1,12
CSP SIO
LDA 2,8
CSP RDC
CSP EIO
LDA 1,48
LDC I,2
CHK J,1,3
DEC I,1
IXA 1
LOC 40
LOD C,2,8
CHK I,0,255
STO C
LDA 1,12
CSP SIO
LDA 2,8
CSP RDC
CSP EIO
LDA 1,48
LDC I,3
LOC 50
CHK J,1,3
DEC I,1
IXA 1
LOD C,2,8
CHK I,0,255
STO C
MST 2,4,4
LDA 1,48
PAR A
CUP I,2,MNEM$038
LOC 60
CHK I,0,72
STR I,1,44
LOD I,1,44
ORD
CHK I,0,72
XJP L4
L8 LAB
UJP L7
L9 LAB
MST 3,4,4
LDA 1,52
PAR A
LOC 70
CUP P,2,READT222
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,100
PAR A
CUP P,2,READN221
MST 3,4,4
LOC 80
LDA 1,88
PAR A
CUP P,2,READN221
MST 3,4,4
LDA 1,68
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,64
PAR A
LOC 90
CUP P,2,READI223
MST 3,4,4
LDA 1,60
PAR A
CUP P,2,READI223
UJP L7
L10 LAB
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
LOC 100
MST 3,4,4
LDA 1,68
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,64
PAR A
CUP P,2,READI223
UJP L7
L11 LAB
UJP L7
L12 LAB
LOC 110
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
UJP L7
L13 LAB
MST 3,4,4
LDA 1,52
PAR A
CUP P,2,READT222
MST 3,4,4
LOC 120
LDA 1,100
PAR A
CUP P,2,READN221
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,68
PAR A
LOC 130
CUP P,2,READI223
MST 3,4,4
LDA 1,64
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,60
PAR A
CUP P,2,READI223
MST 3,4,4
LOC 140
LDA 1,56
PAR A
CUP P,2,READI223
UJP L7
L14 LAB
MST 3,4,4
LDA 1,100
PAR A
CUP P,2,READN221
UJP L7
L15 LAB
MST 3,4,4
LOC 150
LDA 1,100
PAR A
CUP P,2,READN221
LDA 1,100
LCA 'PCODE '
NEQ M,8
FJP L16
MST 3,4,4
LDA 1,88
PAR A
LOC 160
CUP P,2,READN221
LDA 1,88
LDC I,1
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,'A'
EQU C
FJP L17
LOC 170
LDA 1,100
LCA 'S1CODE '
NEQ M,8
FJP L18
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
L18 LAB
UJP L19
L17 LAB
LDA 1,88
LOC 180
LDC I,1
CHK J,1,8
DEC I,1
IXA 1
IND C,0
LDC C,'P'
NEQ C
FJP L20
MST 2,4,4
LDC I,28
LOC 190
CHK I,0,68
PAR I
CUP P,2,ERROR005
L20 LAB
L19 LAB
L16 LAB
UJP L7
L21 LAB
UJP L7
L22 LAB
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
UJP L7
L23 LAB
LOC 200
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,68
PAR A
CUP P,2,READI223
UJP L7
L24 LAB
MST 3,4,4
LOC 210
LDA 1,100
PAR A
CUP P,2,READN221
UJP L7
L25 LAB
MST 3,4,4
LDA 1,52
PAR A
CUP P,2,READT222
LOD I,1,52
LDC I,3
LOC 220
EQU I
FJP L26
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
L26 LAB
UJP L7
L27 LAB
MST 3,4,4
LDA 1,52
PAR A
LOC 230
CUP P,2,READT222
UJP L7
L28 LAB
MST 3,4,4
LDA 1,52
PAR A
CUP P,2,READT222
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
LOC 240
UJP L7
L29 LAB
MST 3,4,4
LDA 1,52
PAR A
CUP P,2,READT222
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
MST 3,4,4
LOC 250
LDA 1,68
PAR A
CUP P,2,READI223
UJP L7
L30 LAB
MST 3,4,4
LDA 1,100
PAR A
CUP P,2,READN221
UJP L7
L31 LAB
MST 3,4,4
LOC 260
LDA 1,52
PAR A
CUP P,2,READT222
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
MST 3,4,4
LDA 1,100
PAR A
LOC 270
CUP P,2,READN221
UJP L7
L32 LAB
MST 3,4,4
LDA 1,52
PAR A
CUP P,2,READT222
LOD I,1,52
ORD
CHK I,0,15
XJP L33
L37 LAB
LOC 280
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
UJP L36
L38 LAB
LDA 1,12
CSP SIO
LDA 2,8
CSP RDC
LDA 2,8
LOC 290
CSP RDC
LDA 2,8
CSP RDC
CSP EIO
LOD C,2,8
ORD
LDC I,0
SBI
STR I,1,72
UJP L36
L39 LAB
LOC 300
MST 3,4,4
LDA 1,76
PAR A
CUP P,2,READR224
UJP L36
L40 LAB
UJP L36
L41 LAB
MST 3,4,4
LDA 1,72
PAR A
CUP P,2,READI223
LOC 310
UJP L36
L42 LAB
MST 3,4,4
LDA 1,80
PAR A
CUP P,2,READS225
UJP L36
L33 DEF 4
L34 DEF 13
L35 LAB
UJP L40
UJP L41
UJP L38
UJP L42
LOC 320
UJP L36
UJP L36
UJP L37
UJP L36
UJP L36
UJP L39
L36 LAB
UJP L7
L44 LAB
LDA 1,12
CSP SIO
LDA 2,8
LOC 330
CSP RDC
LDA 2,8
CSP RDC
LDA 2,8
CSP RDC
CSP EIO
LDC I,0
CHK I,0,150
STR I,1,276
L45 LAB
LOD C,2,8
LOC 340
LDC C,'''
NEQ C
LOD C,1,12
LDC C,'''
EQU C
IOR
FJP L46
LOD I,1,276
LDC I,1
ADI
LOC 350
CHK I,0,150
STR I,1,276
LDA 1,124
LOD I,1,276
CHK J,1,150
DEC I,1
IXA 1
LOD C,2,8
CHK I,0,255
STO C
LOC 360
LOD C,2,8
LDC C,'''
EQU C
FJP L47
LDA 1,12
CSP SIO
LDA 2,8
CSP RDC
CSP EIO
L47 LAB
LDA 1,12
LOC 370
CSP SIO
LDA 2,8
CSP RDC
CSP EIO
UJP L45
L46 LAB
UJP L7
L4 DEF 0
L5 DEF 72
L6 LAB
UJP L21
UJP L21
UJP L21
UJP L21
LOC 380
UJP L22
UJP L29
UJP L21
UJP L30
UJP L31
UJP L28
UJP L12
UJP L21
UJP L21
UJP L9
LOC 390
UJP L21
UJP L24
UJP L21
UJP L21
UJP L28
UJP L28
UJP L21
UJP L21
UJP L21
UJP L22
LOC 400
UJP L11
UJP L22
UJP L44
UJP L23
UJP L32
UJP L28
UJP L22
UJP L29
UJP L21
UJP L22
LOC 410
UJP L21
UJP L10
UJP L22
UJP L21
UJP L21
UJP L21
UJP L21
UJP L21
UJP L27
UJP L21
LOC 420
UJP L27
UJP L21
UJP L21
UJP L21
UJP L21
UJP L21
UJP L21
UJP L28
UJP L13
UJP L27
LOC 430
UJP L8
UJP L29
UJP L21
UJP L14
UJP L15
UJP L21
UJP L24
UJP L21
UJP L24
UJP L21
LOC 440
UJP L21
UJP L21
UJP L21
UJP L25
UJP L25
UJP L25
UJP L25
UJP L25
UJP L25
L7 LAB
LDA 1,12
LOC 450
CSP SIO
CSP RLN
CSP EIO
RET P
L1 DEF 12
SST P INITI226 2 0 0 24 0
SST P ENTER227 3 8 4 4 8
LOC 0
ENTER227 ENT P,3,L1 ENTER_OPC 1 1 1
LDA 3,16
LOD A,3,8
MOV 3
MST 2,4,4
LDA 3,16
PAR A
CUP I,2,OPC$H036
CHK I,0,196
STR I,3,20
L2 LAB
LOC 10
LDA 1,2744
LOD I,3,20
CHK J,0,196
IXA 8
LCA ' '
NEQ M,3
FJP L3
LOD I,3,20
LDC I,1
ADI
LOC 20
LDC I,197
MOD
CHK I,0,196
STR I,3,20
UJP L2
L3 LAB
LDA 1,2744
LOD I,3,20
CHK J,0,196
IXA 8
LDA 3,16
LOC 30
MOV 3
LDA 1,2744
LOD I,3,20
CHK J,0,196
IXA 8
INC A,4
LOD I,3,12
CHK I,0,72
STO I
RET P
L1 DEF 24
SST P ENTER228 3 8 4 12 8
LOC 0
ENTER228 ENT P,3,L1 ENTER_CSP 1 1 1
LDA 3,16
LOD A,3,8
MOV 3
LDA 3,24
LCA ' '
MOV 8
LDA 3,24
LDC I,1
CHK J,1,8
LOC 10
DEC I,1
IXA 1
LDA 3,16
LDC I,1
CHK J,1,3
DEC I,1
IXA 1
IND C,0
CHK I,0,255
STO C
LOC 20
LDA 3,24
LDC I,2
CHK J,1,8
DEC I,1
IXA 1
LDA 3,16
LDC I,2
CHK J,1,3
DEC I,1
IXA 1
LOC 30
IND C,0
CHK I,0,255
STO C
LDA 3,24
LDC I,3
CHK J,1,8
DEC I,1
IXA 1
LDA 3,16
LDC I,3
LOC 40
CHK J,1,3
DEC I,1
IXA 1
IND C,0
CHK I,0,255
STO C
MST 2,4,4
LDA 3,24
PAR A
CUP I,2,CSP$H035
LOC 50
CHK I,0,90
STR I,3,20
L2 LAB
LDA 1,1288
LOD I,3,20
CHK J,0,90
IXA 16
LCA ' '
NEQ M,8
FJP L3
LOD I,3,20
LOC 60
LDC I,1
ADI
LDC I,91
MOD
CHK I,0,90
STR I,3,20
UJP L2
L3 LAB
LDA 1,1288
LOD I,3,20
CHK J,0,90
LOC 70
IXA 16
LDA 3,24
MOV 8
LDA 1,1288
LOD I,3,20
CHK J,0,90
IXA 16
INC A,8
LDC I,3
CHK I,1,8
LOC 80
STO I
LDA 1,1288
LOD I,3,20
CHK J,0,90
IXA 16
INC A,12
LOD I,3,12
CHK I,0,31
STO I
RET P
L1 DEF 32
SST P INIT1229 3 0 0 0 0
LOC 0
INIT1229 ENT P,3,L1 INIT1 1 1 1
LDC I,0
STR I,1,4572
LDC I,0
STR I,1,4568
LDC I,0
CHK I,0,1
STR I,1,4456
LDC I,0
CHK I,0,31
LOC 10
STR I,1,4460
LDC I,0
CHK I,-32,31
STR I,1,4464
LDC I,0
CHK I,0,5
STR I,1,4504
LDC N
CHK A,-1,0
STR A,1,4508
LOC 20
LDC I,0
CHK I,0,1
STR I,1,4468
LDC I,0
CHK I,0,1
STR I,1,4484
LDC I,0
CHK I,0,1
STR I,1,4480
LDC I,0
LOC 30
CHK I,0,1
STR I,1,4476
LDC I,0
CHK I,0,1
STR I,1,4472
LDC I,0
CHK I,0,3
STR I,1,4488
LDC I,0
CHK I,0,1073741823
LOC 40
STR I,1,4492
LDC I,0
CHK I,0,31
STR I,1,4496
LDC I,0
CHK I,-16777216,16777215
STR I,1,4500
LDC I,0
CHK I,0,1
STR I,1,4400
LOC 50
LDC I,1
CHK I,0,31
STR I,1,4404
LDC I,0
CHK I,-32,31
STR I,1,4408
LDC I,0
CHK I,0,5
STR I,1,4448
LDC N
LOC 60
CHK A,-1,0
STR A,1,4452
LDC I,1
CHK I,0,1
STR I,1,4412
LDA 1,4416
LDA 1,4568
MOV 8
LDC I,1
CHK I,0,1
LOC 70
STR I,1,4344
LDC I,1
CHK I,0,31
STR I,1,4348
LDC I,1
CHK I,-32,31
STR I,1,4352
LDC I,0
CHK I,0,5
STR I,1,4392
LOC 80
LDC N
CHK A,-1,0
STR A,1,4396
LDC I,1
CHK I,0,1
STR I,1,4356
LDA 1,4360
LDA 1,4568
MOV 8
LDC I,0
LOC 90
CHK I,0,999999
STR I,1,4724
LDC N
CHK A,-1,0
STR A,1,4732
LDC N
CHK A,-1,0
STR A,1,4728
LDC I,0
CHK I,0,999999
LOC 100
STR I,1,4736
LDC N
CHK A,-1,0
STR A,1,4744
LDC N
CHK A,-1,0
STR A,1,4740
LDC I,1
STR I,1,4692
LDC I,0
LOC 110
CHK I,0,8
STR I,1,4700
LDC I,0
STR I,1,4696
LDC I,0
CHK I,0,3
STR I,1,4704
LDC I,1
CHK I,1,2
STR I,1,4708
LOC 120
LDC I,1
STR I,1,4712
LDC I,0
CHK I,0,8
STR I,1,4720
LDC I,0
STR I,1,4716
LDC N
CHK A,-1,0
STR A,1,4576
LOC 130
LDC I,14
CHK I,0,15
STR I,1,4580
LDC I,0
CHK I,0,1
STR I,1,4584
LDA 1,4588
LDA 1,4736
MOV 12
LDA 1,4600
LOC 140
LDA 1,4736
MOV 12
LDC N
CHK A,-1,0
STR A,1,4612
LDC B,0
STR B,1,4616
LDC S,(0,0,0,0)
STR S,1,4620
LDC R,0.0
LOC 150
STR R,1,4628
LDC I,0
CHK I,0,2
STR I,1,4632
LDA 1,4636
LDA 1,4692
MOV 12
LDC I,0
CHK I,0,2
STR I,1,4648
LOC 160
LDA 1,4652
LDA 1,4704
MOV 20
LDA 1,4672
LDA 1,4704
MOV 20
LDA 1,39928
LDC I,0
CHK J,0,8
IXA 48
LOC 170
STR A,3,8
LOD A,3,8
LDC I,14
CHK I,0,15
STO I
LOD A,3,8
INC A,4
LCA 'DUMMY '
MOV 8
LOD A,3,8
LOC 180
INC A,12
LDC I,5
CHK I,1,8
STO I
LOD A,3,8
INC A,44
LDC I,-34359738367
STO I
LOD A,3,8
INC A,40
LOC 190
LDC I,-34359738367
STO I
LOD A,3,8
INC A,36
LDC I,-34359738367
STO I
LOD A,3,8
INC A,24
LDC I,-34359738367
STO I
LOC 200
LOD A,3,8
INC A,32
LDC I,34359738367
STO I
LOD A,3,8
INC A,28
LDC I,0
STO I
LOD A,3,8
INC A,20
LOC 210
LDC I,0
STO I
LOD A,3,8
INC A,16
LDC I,0
STO I
MST 2,8,8
LDA 1,4512
PAR A
LDC I,0
LOC 220
CHK I,0,31
PAR I
CUP P,4,REG$O063
MST 2,8,8
LDA 1,4748
PAR A
LDC I,6
CHK I,0,31
PAR I
CUP P,4,REG$O063
LOC 230
MST 2,8,8
LDA 1,4804
PAR A
LDC I,30
CHK I,0,31
PAR I
CUP P,4,REG$O063
LDC I,0
LDC I,16
ADI
LOC 240
STR I,1,4860
LDC I,0
CHK I,0,15
STR I,1,4324
LDC I,15
CHK I,0,15
STR I,1,4320
LDC I,0
CHK I,0,285
STR I,1,4332
LOC 250
LDC I,285
CHK I,0,285
STR I,1,4328
LDA 1,4864
LDC I,0
CHK J,0,34
IXA 4
LDC I,1
STO I
LDC I,1
LOC 260
STR I,2,12
LDC I,34
STR I,3,8
LOD I,2,12
LOD I,3,8
LEQ I
FJP L3
L2 LAB
LDA 1,4864
LOD I,2,12
CHK J,0,34
LOC 270
IXA 4
LDC I,2
LDA 1,4864
LOD I,2,12
LDC I,1
SBI
CHK J,0,34
IXA 4
IND I,0
MPI
LOC 280
STO I
LOD I,2,12
LOD I,3,8
NEQ I
FJP L3
LOD I,2,12
INC I,1
STR I,2,12
UJP L2
L3 LAB
LDC I,8
LOC 290
LDC I,1
SBI
CHK I,0,31
STR I,1,35484
LDC I,29
LDC I,1
ADI
CHK I,0,31
STR I,1,35480
LDC B,0
LOC 300
STR B,1,35757
LDA 1,30724
LDC I,2
CHK J,0,15
IXA 1
LDC C,'A'
CHK I,0,255
STO C
LDA 1,30724
LDC I,5
LOC 310
CHK J,0,15
IXA 1
LDC C,'B'
CHK I,0,255
STO C
LDA 1,30724
LDC I,6
CHK J,0,15
IXA 1
LDC C,'C'
LOC 320
CHK I,0,255
STO C
LDA 1,30724
LDC I,11
CHK J,0,15
IXA 1
LDC C,'D'
CHK I,0,255
STO C
LDA 1,30724
LOC 330
LDC I,9
CHK J,0,15
IXA 1
LDC C,'H'
CHK I,0,255
STO C
LDA 1,30724
LDC I,10
CHK J,0,15
IXA 1
LOC 340
LDC C,'I'
CHK I,0,255
STO C
LDA 1,30724
LDC I,15
CHK J,0,15
IXA 1
LDC C,'J'
CHK I,0,255
STO C
LOC 350
LDA 1,30724
LDC I,3
CHK J,0,15
IXA 1
LDC C,'M'
CHK I,0,255
STO C
LDA 1,30724
LDC I,4
CHK J,0,15
LOC 360
IXA 1
LDC C,'N'
CHK I,0,255
STO C
LDA 1,30724
LDC I,14
CHK J,0,15
IXA 1
LDC C,'P'
CHK I,0,255
LOC 370
STO C
LDA 1,30724
LDC I,8
CHK J,0,15
IXA 1
LDC C,'Q'
CHK I,0,255
STO C
LDA 1,30724
LDC I,13
LOC 380
CHK J,0,15
IXA 1
LDC C,'R'
CHK I,0,255
STO C
LDA 1,30724
LDC I,7
CHK J,0,15
IXA 1
LDC C,'S'
LOC 390
CHK I,0,255
STO C
LDA 1,30724
LDC I,12
CHK J,0,15
IXA 1
LDC C,'X'
CHK I,0,255
STO C
LDA 1,30740
LOC 400
LDC I,2
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,30740
LDC I,5
CHK J,0,15
IXA 4
LOC 410
LDC I,1
CHK I,0,4
STO I
LDA 1,30740
LDC I,6
CHK J,0,15
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 420
LDA 1,30740
LDC I,11
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,30740
LDC I,9
CHK J,0,15
LOC 430
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,30740
LDC I,10
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,4
LOC 440
STO I
LDA 1,30740
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,4
STO I
LDA 1,30740
LDC I,3
LOC 450
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,30740
LDC I,4
CHK J,0,15
IXA 4
LDC I,4
LOC 460
CHK I,0,4
STO I
LDA 1,30740
LDC I,14
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,4
STO I
LDA 1,30740
LOC 470
LDC I,8
CHK J,0,15
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,30740
LDC I,13
CHK J,0,15
IXA 4
LOC 480
LDC I,4
CHK I,0,4
STO I
LDA 1,30740
LDC I,7
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 490
LDA 1,30740
LDC I,12
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,30804
LDC I,2
CHK J,0,15
LOC 500
IXA 4
LDC I,3
CHK I,1,4
STO I
LDA 1,30804
LDC I,3
CHK J,0,15
IXA 4
LDC I,3
CHK I,1,4
LOC 510
STO I
LDA 1,30804
LDC I,5
CHK J,0,15
IXA 4
LDC I,1
CHK I,1,4
STO I
LDA 1,30804
LDC I,4
LOC 520
CHK J,0,15
IXA 4
LDC I,3
CHK I,1,4
STO I
LDA 1,30804
LDC I,6
CHK J,0,15
IXA 4
LDC I,1
LOC 530
CHK I,1,4
STO I
LDA 1,30804
LDC I,14
CHK J,0,15
IXA 4
LDC I,1
CHK I,1,4
STO I
LDA 1,30804
LOC 540
LDC I,11
CHK J,0,15
IXA 4
LDC I,4
CHK I,1,4
STO I
LDA 1,30804
LDC I,8
CHK J,0,15
IXA 4
LOC 550
LDC I,1
CHK I,1,4
STO I
LDA 1,30804
LDC I,9
CHK J,0,15
IXA 4
LDC I,2
CHK I,1,4
STO I
LOC 560
LDA 1,30804
LDC I,13
CHK J,0,15
IXA 4
LDC I,3
CHK I,1,4
STO I
LDA 1,30804
LDC I,10
CHK J,0,15
LOC 570
IXA 4
LDC I,3
CHK I,1,4
STO I
LDA 1,30804
LDC I,7
CHK J,0,15
IXA 4
LDC I,4
CHK I,1,4
LOC 580
STO I
LDA 1,30804
LDC I,15
CHK J,0,15
IXA 4
LDC I,1
CHK I,1,4
STO I
LDA 1,30804
LDC I,12
LOC 590
CHK J,0,15
IXA 4
LDC I,4
CHK I,1,4
STO I
LDA 1,30868
LDC I,2
CHK J,0,15
IXA 4
LDC I,4
LOC 600
CHK I,0,8
STO I
LDA 1,30868
LDC I,5
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
STO I
LDA 1,30868
LOC 610
LDC I,6
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
STO I
LDA 1,30868
LDC I,11
CHK J,0,15
IXA 4
LOC 620
LDC I,8
CHK I,0,8
STO I
LDA 1,30868
LDC I,9
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
STO I
LOC 630
LDA 1,30868
LDC I,10
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
STO I
LDA 1,30868
LDC I,15
CHK J,0,15
LOC 640
IXA 4
LDC I,0
CHK I,0,8
STO I
LDA 1,30868
LDC I,3
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
LOC 650
STO I
LDA 1,30868
LDC I,4
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
STO I
LDA 1,30868
LDC I,14
LOC 660
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,8
STO I
LDA 1,30868
LDC I,8
CHK J,0,15
IXA 4
LDC I,4
LOC 670
CHK I,0,8
STO I
LDA 1,30868
LDC I,13
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,8
STO I
LDA 1,30868
LOC 680
LDC I,7
CHK J,0,15
IXA 4
LDC I,8
CHK I,0,8
STO I
LDA 1,30868
LDC I,12
CHK J,0,15
IXA 4
LOC 690
LDC I,8
CHK I,0,8
STO I
LOD I,1,4324
CHK I,0,15
STR I,2,24
LOD I,1,4320
CHK I,0,15
ORD
STR I,3,8
LOC 700
LOD I,2,24
ORD
LOD I,3,8
LEQ I
FJP L5
L4 LAB
LDA 1,30932
LOD I,2,24
CHK J,0,15
IXA 1
LOD I,2,24
LOC 710
ORD
CHK S,0,63
LDC S,(0,0,0,6272)
INN
STO B
LDA 1,30948
LOD I,2,24
CHK J,0,15
IXA 1
LOD I,2,24
LOC 720
ORD
CHK S,0,63
LDC S,(0,0,0,9244)
INN
STO B
LDA 1,30964
LOD I,2,24
CHK J,0,15
IXA 1
LOD I,2,24
LOC 730
ORD
CHK S,0,63
LDC S,(0,0,0,3840)
INN
STO B
LDA 1,30980
LOD I,2,24
CHK J,0,15
IXA 1
LOD I,2,24
LOC 740
ORD
CHK S,0,63
LDC S,(0,0,0,12288)
INN
STO B
LOD I,2,24
ORD
LOD I,3,8
NEQ I
FJP L5
LOC 750
LOD I,2,24
INC I,1
CHK I,0,15
STR I,2,24
UJP L4
L5 LAB
LDA 1,30996
LDC I,2
CHK J,0,15
IXA 4
LDC I,0
LOC 760
CHK I,0,285
STO I
LDA 1,30996
LDC I,3
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,30996
LOC 770
LDC I,5
CHK J,0,15
IXA 4
LDC I,193
CHK I,0,285
STO I
LDA 1,30996
LDC I,4
CHK J,0,15
IXA 4
LOC 780
LDC I,0
CHK I,0,285
STO I
LDA 1,30996
LDC I,6
CHK J,0,15
IXA 4
LDC I,193
CHK I,0,285
STO I
LOC 790
LDA 1,30996
LDC I,14
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,30996
LDC I,11
CHK J,0,15
LOC 800
IXA 4
LDC I,196
CHK I,0,285
STO I
LDA 1,30996
LDC I,8
CHK J,0,15
IXA 4
LDC I,193
CHK I,0,285
LOC 810
STO I
LDA 1,30996
LDC I,9
CHK J,0,15
IXA 4
LDC I,194
CHK I,0,285
STO I
LDA 1,30996
LDC I,13
LOC 820
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,30996
LDC I,10
CHK J,0,15
IXA 4
LDC I,195
LOC 830
CHK I,0,285
STO I
LDA 1,30996
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,30996
LOC 840
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,30996
LDC I,12
CHK J,0,15
IXA 4
LOC 850
LDC I,0
CHK I,0,285
STO I
LDA 1,31060
LDC I,2
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LOC 860
LDA 1,31060
LDC I,3
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,31060
LDC I,5
CHK J,0,15
LOC 870
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,31060
LDC I,4
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
LOC 880
STO I
LDA 1,31060
LDC I,6
CHK J,0,15
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,31060
LDC I,14
LOC 890
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31060
LDC I,11
CHK J,0,15
IXA 4
LDC I,82
LOC 900
CHK I,0,285
STO I
LDA 1,31060
LDC I,8
CHK J,0,15
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,31060
LOC 910
LDC I,9
CHK J,0,15
IXA 4
LDC I,70
CHK I,0,285
STO I
LDA 1,31060
LDC I,13
CHK J,0,15
IXA 4
LOC 920
LDC I,75
CHK I,0,285
STO I
LDA 1,31060
LDC I,10
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LOC 930
LDA 1,31060
LDC I,7
CHK J,0,15
IXA 4
LDC I,82
CHK I,0,285
STO I
LDA 1,31060
LDC I,15
CHK J,0,15
LOC 940
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31060
LDC I,12
CHK J,0,15
IXA 4
LDC I,82
CHK I,0,285
LOC 950
STO I
LDA 1,31252
LDC I,1
CHK J,1,32
DEC I,1
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,31252
LOC 960
LDC I,2
CHK J,1,32
DEC I,1
IXA 4
LDC I,83
CHK I,0,285
STO I
LDA 1,31252
LDC I,3
CHK J,1,32
LOC 970
DEC I,1
IXA 4
LDC I,84
CHK I,0,285
STO I
LDA 1,31252
LDC I,4
CHK J,1,32
DEC I,1
IXA 4
LOC 980
LDC I,85
CHK I,0,285
STO I
LDA 1,31252
LDC I,5
CHK J,1,32
DEC I,1
IXA 4
LDC I,86
CHK I,0,285
LOC 990
STO I
LDA 1,31252
LDC I,6
CHK J,1,32
DEC I,1
IXA 4
LDC I,87
CHK I,0,285
STO I
LDA 1,31252
LOC 1000
LDC I,7
CHK J,1,32
DEC I,1
IXA 4
LDC I,88
CHK I,0,285
STO I
LDA 1,31252
LDC I,8
CHK J,1,32
LOC 1010
DEC I,1
IXA 4
LDC I,89
CHK I,0,285
STO I
LDA 1,31252
LDC I,9
CHK J,1,32
DEC I,1
IXA 4
LOC 1020
LDC I,90
CHK I,0,285
STO I
LDA 1,31252
LDC I,10
CHK J,1,32
DEC I,1
IXA 4
LDC I,91
CHK I,0,285
LOC 1030
STO I
LDA 1,31252
LDC I,11
CHK J,1,32
DEC I,1
IXA 4
LDC I,92
CHK I,0,285
STO I
LDA 1,31252
LOC 1040
LDC I,12
CHK J,1,32
DEC I,1
IXA 4
LDC I,93
CHK I,0,285
STO I
LDA 1,31252
LDC I,13
CHK J,1,32
LOC 1050
DEC I,1
IXA 4
LDC I,94
CHK I,0,285
STO I
LDA 1,31252
LDC I,14
CHK J,1,32
DEC I,1
IXA 4
LOC 1060
LDC I,95
CHK I,0,285
STO I
LDA 1,31252
LDC I,15
CHK J,1,32
DEC I,1
IXA 4
LDC I,96
CHK I,0,285
LOC 1070
STO I
LDA 1,31252
LDC I,16
CHK J,1,32
DEC I,1
IXA 4
LDC I,97
CHK I,0,285
STO I
LDA 1,31252
LOC 1080
LDC I,17
CHK J,1,32
DEC I,1
IXA 4
LDC I,98
CHK I,0,285
STO I
LDA 1,31252
LDC I,18
CHK J,1,32
LOC 1090
DEC I,1
IXA 4
LDC I,99
CHK I,0,285
STO I
LDA 1,31252
LDC I,19
CHK J,1,32
DEC I,1
IXA 4
LOC 1100
LDC I,100
CHK I,0,285
STO I
LDA 1,31252
LDC I,20
CHK J,1,32
DEC I,1
IXA 4
LDC I,101
CHK I,0,285
LOC 1110
STO I
LDA 1,31252
LDC I,21
CHK J,1,32
DEC I,1
IXA 4
LDC I,102
CHK I,0,285
STO I
LDA 1,31252
LOC 1120
LDC I,22
CHK J,1,32
DEC I,1
IXA 4
LDC I,103
CHK I,0,285
STO I
LDA 1,31252
LDC I,23
CHK J,1,32
LOC 1130
DEC I,1
IXA 4
LDC I,104
CHK I,0,285
STO I
LDA 1,31252
LDC I,24
CHK J,1,32
DEC I,1
IXA 4
LOC 1140
LDC I,105
CHK I,0,285
STO I
LDA 1,31252
LDC I,25
CHK J,1,32
DEC I,1
IXA 4
LDC I,106
CHK I,0,285
LOC 1150
STO I
LDA 1,31252
LDC I,26
CHK J,1,32
DEC I,1
IXA 4
LDC I,107
CHK I,0,285
STO I
LDA 1,31252
LOC 1160
LDC I,27
CHK J,1,32
DEC I,1
IXA 4
LDC I,108
CHK I,0,285
STO I
LDA 1,31252
LDC I,28
CHK J,1,32
LOC 1170
DEC I,1
IXA 4
LDC I,109
CHK I,0,285
STO I
LDA 1,31252
LDC I,29
CHK J,1,32
DEC I,1
IXA 4
LOC 1180
LDC I,110
CHK I,0,285
STO I
LDA 1,31252
LDC I,30
CHK J,1,32
DEC I,1
IXA 4
LDC I,111
CHK I,0,285
LOC 1190
STO I
LDA 1,31252
LDC I,31
CHK J,1,32
DEC I,1
IXA 4
LDC I,112
CHK I,0,285
STO I
LDA 1,31252
LOC 1200
LDC I,32
CHK J,1,32
DEC I,1
IXA 4
LDC I,113
CHK I,0,285
STO I
LDA 1,31380
LDC I,1
CHK J,1,32
LOC 1210
DEC I,1
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,31380
LDC I,2
CHK J,1,32
DEC I,1
IXA 4
LOC 1220
LDC I,116
CHK I,0,285
STO I
LDA 1,31380
LDC I,3
CHK J,1,32
DEC I,1
IXA 4
LDC I,117
CHK I,0,285
LOC 1230
STO I
LDA 1,31380
LDC I,4
CHK J,1,32
DEC I,1
IXA 4
LDC I,118
CHK I,0,285
STO I
LDA 1,31380
LOC 1240
LDC I,5
CHK J,1,32
DEC I,1
IXA 4
LDC I,119
CHK I,0,285
STO I
LDA 1,31380
LDC I,6
CHK J,1,32
LOC 1250
DEC I,1
IXA 4
LDC I,120
CHK I,0,285
STO I
LDA 1,31380
LDC I,7
CHK J,1,32
DEC I,1
IXA 4
LOC 1260
LDC I,121
CHK I,0,285
STO I
LDA 1,31380
LDC I,8
CHK J,1,32
DEC I,1
IXA 4
LDC I,122
CHK I,0,285
LOC 1270
STO I
LDA 1,31380
LDC I,9
CHK J,1,32
DEC I,1
IXA 4
LDC I,123
CHK I,0,285
STO I
LDA 1,31380
LOC 1280
LDC I,10
CHK J,1,32
DEC I,1
IXA 4
LDC I,124
CHK I,0,285
STO I
LDA 1,31380
LDC I,11
CHK J,1,32
LOC 1290
DEC I,1
IXA 4
LDC I,125
CHK I,0,285
STO I
LDA 1,31380
LDC I,12
CHK J,1,32
DEC I,1
IXA 4
LOC 1300
LDC I,126
CHK I,0,285
STO I
LDA 1,31380
LDC I,13
CHK J,1,32
DEC I,1
IXA 4
LDC I,127
CHK I,0,285
LOC 1310
STO I
LDA 1,31380
LDC I,14
CHK J,1,32
DEC I,1
IXA 4
LDC I,128
CHK I,0,285
STO I
LDA 1,31380
LOC 1320
LDC I,15
CHK J,1,32
DEC I,1
IXA 4
LDC I,129
CHK I,0,285
STO I
LDA 1,31380
LDC I,16
CHK J,1,32
LOC 1330
DEC I,1
IXA 4
LDC I,130
CHK I,0,285
STO I
LDA 1,31380
LDC I,17
CHK J,1,32
DEC I,1
IXA 4
LOC 1340
LDC I,131
CHK I,0,285
STO I
LDA 1,31380
LDC I,18
CHK J,1,32
DEC I,1
IXA 4
LDC I,132
CHK I,0,285
LOC 1350
STO I
LDA 1,31380
LDC I,19
CHK J,1,32
DEC I,1
IXA 4
LDC I,133
CHK I,0,285
STO I
LDA 1,31380
LOC 1360
LDC I,20
CHK J,1,32
DEC I,1
IXA 4
LDC I,134
CHK I,0,285
STO I
LDA 1,31380
LDC I,21
CHK J,1,32
LOC 1370
DEC I,1
IXA 4
LDC I,135
CHK I,0,285
STO I
LDA 1,31380
LDC I,22
CHK J,1,32
DEC I,1
IXA 4
LOC 1380
LDC I,136
CHK I,0,285
STO I
LDA 1,31380
LDC I,23
CHK J,1,32
DEC I,1
IXA 4
LDC I,137
CHK I,0,285
LOC 1390
STO I
LDA 1,31380
LDC I,24
CHK J,1,32
DEC I,1
IXA 4
LDC I,138
CHK I,0,285
STO I
LDA 1,31380
LOC 1400
LDC I,25
CHK J,1,32
DEC I,1
IXA 4
LDC I,139
CHK I,0,285
STO I
LDA 1,31380
LDC I,26
CHK J,1,32
LOC 1410
DEC I,1
IXA 4
LDC I,140
CHK I,0,285
STO I
LDA 1,31380
LDC I,27
CHK J,1,32
DEC I,1
IXA 4
LOC 1420
LDC I,141
CHK I,0,285
STO I
LDA 1,31380
LDC I,28
CHK J,1,32
DEC I,1
IXA 4
LDC I,142
CHK I,0,285
LOC 1430
STO I
LDA 1,31380
LDC I,29
CHK J,1,32
DEC I,1
IXA 4
LDC I,143
CHK I,0,285
STO I
LDA 1,31380
LOC 1440
LDC I,30
CHK J,1,32
DEC I,1
IXA 4
LDC I,144
CHK I,0,285
STO I
LDA 1,31380
LDC I,31
CHK J,1,32
LOC 1450
DEC I,1
IXA 4
LDC I,145
CHK I,0,285
STO I
LDA 1,31380
LDC I,32
CHK J,1,32
DEC I,1
IXA 4
LOC 1460
LDC I,146
CHK I,0,285
STO I
LDA 1,31124
LDC I,2
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LOC 1470
LDA 1,31124
LDC I,3
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31124
LDC I,5
CHK J,0,15
LOC 1480
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31124
LDC I,4
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 1490
STO I
LDA 1,31124
LDC I,6
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31124
LDC I,14
LOC 1500
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31124
LDC I,11
CHK J,0,15
IXA 4
LDC I,7
LOC 1510
CHK I,0,285
STO I
LDA 1,31124
LDC I,8
CHK J,0,15
IXA 4
LDC I,4
CHK I,0,285
STO I
LDA 1,31124
LOC 1520
LDC I,9
CHK J,0,15
IXA 4
LDC I,5
CHK I,0,285
STO I
LDA 1,31124
LDC I,13
CHK J,0,15
IXA 4
LOC 1530
LDC I,6
CHK I,0,285
STO I
LDA 1,31124
LDC I,10
CHK J,0,15
IXA 4
LDC I,6
CHK I,0,285
STO I
LOC 1540
LDA 1,31124
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31124
LDC I,15
CHK J,0,15
LOC 1550
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31124
LDC I,12
CHK J,0,15
IXA 4
LDC I,7
CHK I,0,285
LOC 1560
STO I
LDA 1,31188
LDC I,2
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31188
LDC I,3
LOC 1570
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31188
LDC I,5
CHK J,0,15
IXA 4
LDC I,0
LOC 1580
CHK I,0,285
STO I
LDA 1,31188
LDC I,4
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31188
LOC 1590
LDC I,6
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31188
LDC I,14
CHK J,0,15
IXA 4
LOC 1600
LDC I,0
CHK I,0,285
STO I
LDA 1,31188
LDC I,11
CHK J,0,15
IXA 4
LDC I,152
CHK I,0,285
STO I
LOC 1610
LDA 1,31188
LDC I,8
CHK J,0,15
IXA 4
LDC I,149
CHK I,0,285
STO I
LDA 1,31188
LDC I,9
CHK J,0,15
LOC 1620
IXA 4
LDC I,150
CHK I,0,285
STO I
LDA 1,31188
LDC I,13
CHK J,0,15
IXA 4
LDC I,151
CHK I,0,285
LOC 1630
STO I
LDA 1,31188
LDC I,10
CHK J,0,15
IXA 4
LDC I,151
CHK I,0,285
STO I
LDA 1,31188
LDC I,7
LOC 1640
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31188
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
LOC 1650
CHK I,0,285
STO I
LDA 1,31188
LDC I,12
CHK J,0,15
IXA 4
LDC I,152
CHK I,0,285
STO I
LDA 1,31508
LOC 1660
LDC I,2
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31508
LDC I,5
CHK J,0,15
IXA 4
LOC 1670
LDC I,0
CHK I,0,285
STO I
LDA 1,31508
LDC I,6
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LOC 1680
LDA 1,31508
LDC I,11
CHK J,0,15
IXA 4
LDC I,46
CHK I,0,285
STO I
LDA 1,31508
LDC I,9
CHK J,0,15
LOC 1690
IXA 4
LDC I,44
CHK I,0,285
STO I
LDA 1,31508
LDC I,10
CHK J,0,15
IXA 4
LDC I,45
CHK I,0,285
LOC 1700
STO I
LDA 1,31508
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31508
LDC I,3
LOC 1710
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31508
LDC I,4
CHK J,0,15
IXA 4
LDC I,0
LOC 1720
CHK I,0,285
STO I
LDA 1,31508
LDC I,14
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31508
LOC 1730
LDC I,8
CHK J,0,15
IXA 4
LDC I,43
CHK I,0,285
STO I
LDA 1,31508
LDC I,13
CHK J,0,15
IXA 4
LOC 1740
LDC I,0
CHK I,0,285
STO I
LDA 1,31508
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LOC 1750
LDA 1,31508
LDC I,12
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,2
CHK J,0,15
LOC 1760
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,3
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 1770
STO I
LDA 1,31572
LDC I,5
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,4
LOC 1780
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,6
CHK J,0,15
IXA 4
LDC I,0
LOC 1790
CHK I,0,285
STO I
LDA 1,31572
LDC I,14
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LOC 1800
LDC I,11
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,8
CHK J,0,15
IXA 4
LOC 1810
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,9
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LOC 1820
LDA 1,31572
LDC I,13
CHK J,0,15
IXA 4
LDC I,41
CHK I,0,285
STO I
LDA 1,31572
LDC I,10
CHK J,0,15
LOC 1830
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 1840
STO I
LDA 1,31572
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31572
LDC I,12
LOC 1850
CHK J,0,15
IXA 4
LDC I,42
CHK I,0,285
STO I
LDA 1,31636
LDC I,0
CHK J,0,31
IXA 4
LDC I,201
LOC 1860
CHK I,0,285
STO I
LDA 1,31636
LDC I,1
CHK J,0,31
IXA 4
LDC I,202
CHK I,0,285
STO I
LDA 1,31636
LOC 1870
LDC I,2
CHK J,0,31
IXA 4
LDC I,203
CHK I,0,285
STO I
LDA 1,31636
LDC I,3
CHK J,0,31
IXA 4
LOC 1880
LDC I,204
CHK I,0,285
STO I
LDA 1,31636
LDC I,4
CHK J,0,31
IXA 4
LDC I,205
CHK I,0,285
STO I
LOC 1890
LDA 1,31636
LDC I,5
CHK J,0,31
IXA 4
LDC I,206
CHK I,0,285
STO I
LDA 1,31636
LDC I,6
CHK J,0,31
LOC 1900
IXA 4
LDC I,207
CHK I,0,285
STO I
LDA 1,31636
LDC I,7
CHK J,0,31
IXA 4
LDC I,208
CHK I,0,285
LOC 1910
STO I
LDA 1,31636
LDC I,8
CHK J,0,31
IXA 4
LDC I,209
CHK I,0,285
STO I
LDA 1,31636
LDC I,9
LOC 1920
CHK J,0,31
IXA 4
LDC I,210
CHK I,0,285
STO I
LDA 1,31636
LDC I,10
CHK J,0,31
IXA 4
LDC I,211
LOC 1930
CHK I,0,285
STO I
LDA 1,31636
LDC I,11
CHK J,0,31
IXA 4
LDC I,212
CHK I,0,285
STO I
LDA 1,31636
LOC 1940
LDC I,12
CHK J,0,31
IXA 4
LDC I,213
CHK I,0,285
STO I
LDA 1,31636
LDC I,13
CHK J,0,31
IXA 4
LOC 1950
LDC I,214
CHK I,0,285
STO I
LDA 1,31636
LDC I,14
CHK J,0,31
IXA 4
LDC I,215
CHK I,0,285
STO I
LOC 1960
LDA 1,31636
LDC I,15
CHK J,0,31
IXA 4
LDC I,216
CHK I,0,285
STO I
LDA 1,31636
LDC I,16
CHK J,0,31
LOC 1970
IXA 4
LDC I,217
CHK I,0,285
STO I
LDA 1,31636
LDC I,17
CHK J,0,31
IXA 4
LDC I,218
CHK I,0,285
LOC 1980
STO I
LDA 1,31636
LDC I,18
CHK J,0,31
IXA 4
LDC I,219
CHK I,0,285
STO I
LDA 1,31636
LDC I,19
LOC 1990
CHK J,0,31
IXA 4
LDC I,220
CHK I,0,285
STO I
LDA 1,31636
LDC I,20
CHK J,0,31
IXA 4
LDC I,221
LOC 2000
CHK I,0,285
STO I
LDA 1,31636
LDC I,21
CHK J,0,31
IXA 4
LDC I,222
CHK I,0,285
STO I
LDA 1,31636
LOC 2010
LDC I,22
CHK J,0,31
IXA 4
LDC I,223
CHK I,0,285
STO I
LDA 1,31636
LDC I,23
CHK J,0,31
IXA 4
LOC 2020
LDC I,224
CHK I,0,285
STO I
LDA 1,31636
LDC I,24
CHK J,0,31
IXA 4
LDC I,225
CHK I,0,285
STO I
LOC 2030
LDA 1,31636
LDC I,25
CHK J,0,31
IXA 4
LDC I,226
CHK I,0,285
STO I
LDA 1,31636
LDC I,26
CHK J,0,31
LOC 2040
IXA 4
LDC I,227
CHK I,0,285
STO I
LDA 1,31636
LDC I,27
CHK J,0,31
IXA 4
LDC I,228
CHK I,0,285
LOC 2050
STO I
LDA 1,31636
LDC I,28
CHK J,0,31
IXA 4
LDC I,229
CHK I,0,285
STO I
LDA 1,31636
LDC I,29
LOC 2060
CHK J,0,31
IXA 4
LDC I,230
CHK I,0,285
STO I
LDA 1,31636
LDC I,30
CHK J,0,31
IXA 4
LDC I,231
LOC 2070
CHK I,0,285
STO I
LDA 1,31636
LDC I,31
CHK J,0,31
IXA 4
LDC I,232
CHK I,0,285
STO I
LDA 1,31764
LOC 2080
LDC I,0
CHK J,0,31
IXA 4
LDC I,233
CHK I,0,285
STO I
LDA 1,31764
LDC I,1
CHK J,0,31
IXA 4
LOC 2090
LDC I,234
CHK I,0,285
STO I
LDA 1,31764
LDC I,2
CHK J,0,31
IXA 4
LDC I,235
CHK I,0,285
STO I
LOC 2100
LDA 1,31764
LDC I,3
CHK J,0,31
IXA 4
LDC I,236
CHK I,0,285
STO I
LDA 1,31764
LDC I,4
CHK J,0,31
LOC 2110
IXA 4
LDC I,237
CHK I,0,285
STO I
LDA 1,31764
LDC I,5
CHK J,0,31
IXA 4
LDC I,238
CHK I,0,285
LOC 2120
STO I
LDA 1,31764
LDC I,6
CHK J,0,31
IXA 4
LDC I,239
CHK I,0,285
STO I
LDA 1,31764
LDC I,7
LOC 2130
CHK J,0,31
IXA 4
LDC I,240
CHK I,0,285
STO I
LDA 1,31764
LDC I,8
CHK J,0,31
IXA 4
LDC I,241
LOC 2140
CHK I,0,285
STO I
LDA 1,31764
LDC I,9
CHK J,0,31
IXA 4
LDC I,242
CHK I,0,285
STO I
LDA 1,31764
LOC 2150
LDC I,10
CHK J,0,31
IXA 4
LDC I,243
CHK I,0,285
STO I
LDA 1,31764
LDC I,11
CHK J,0,31
IXA 4
LOC 2160
LDC I,244
CHK I,0,285
STO I
LDA 1,31764
LDC I,12
CHK J,0,31
IXA 4
LDC I,245
CHK I,0,285
STO I
LOC 2170
LDA 1,31764
LDC I,13
CHK J,0,31
IXA 4
LDC I,246
CHK I,0,285
STO I
LDA 1,31764
LDC I,14
CHK J,0,31
LOC 2180
IXA 4
LDC I,247
CHK I,0,285
STO I
LDA 1,31764
LDC I,15
CHK J,0,31
IXA 4
LDC I,248
CHK I,0,285
LOC 2190
STO I
LDA 1,31764
LDC I,16
CHK J,0,31
IXA 4
LDC I,249
CHK I,0,285
STO I
LDA 1,31764
LDC I,17
LOC 2200
CHK J,0,31
IXA 4
LDC I,250
CHK I,0,285
STO I
LDA 1,31764
LDC I,18
CHK J,0,31
IXA 4
LDC I,251
LOC 2210
CHK I,0,285
STO I
LDA 1,31764
LDC I,19
CHK J,0,31
IXA 4
LDC I,252
CHK I,0,285
STO I
LDA 1,31764
LOC 2220
LDC I,20
CHK J,0,31
IXA 4
LDC I,253
CHK I,0,285
STO I
LDA 1,31764
LDC I,21
CHK J,0,31
IXA 4
LOC 2230
LDC I,254
CHK I,0,285
STO I
LDA 1,31764
LDC I,22
CHK J,0,31
IXA 4
LDC I,255
CHK I,0,285
STO I
LOC 2240
LDA 1,31764
LDC I,23
CHK J,0,31
IXA 4
LDC I,256
CHK I,0,285
STO I
LDA 1,31764
LDC I,24
CHK J,0,31
LOC 2250
IXA 4
LDC I,257
CHK I,0,285
STO I
LDA 1,31764
LDC I,25
CHK J,0,31
IXA 4
LDC I,258
CHK I,0,285
LOC 2260
STO I
LDA 1,31764
LDC I,26
CHK J,0,31
IXA 4
LDC I,259
CHK I,0,285
STO I
LDA 1,31764
LDC I,27
LOC 2270
CHK J,0,31
IXA 4
LDC I,260
CHK I,0,285
STO I
LDA 1,31764
LDC I,28
CHK J,0,31
IXA 4
LDC I,261
LOC 2280
CHK I,0,285
STO I
LDA 1,31764
LDC I,29
CHK J,0,31
IXA 4
LDC I,262
CHK I,0,285
STO I
LDA 1,31764
LOC 2290
LDC I,30
CHK J,0,31
IXA 4
LDC I,263
CHK I,0,285
STO I
LDA 1,31764
LDC I,31
CHK J,0,31
IXA 4
LOC 2300
LDC I,264
CHK I,0,285
STO I
LDA 1,31892
LDC I,2
CHK J,0,15
IXA 4
LDC I,26
CHK I,0,285
STO I
LOC 2310
LDA 1,31892
LDC I,3
CHK J,0,15
IXA 4
LDC I,26
CHK I,0,285
STO I
LDA 1,31892
LDC I,5
CHK J,0,15
LOC 2320
IXA 4
LDC I,24
CHK I,0,285
STO I
LDA 1,31892
LDC I,4
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2330
STO I
LDA 1,31892
LDC I,6
CHK J,0,15
IXA 4
LDC I,24
CHK I,0,285
STO I
LDA 1,31892
LDC I,14
LOC 2340
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31892
LDC I,11
CHK J,0,15
IXA 4
LDC I,27
LOC 2350
CHK I,0,285
STO I
LDA 1,31892
LDC I,8
CHK J,0,15
IXA 4
LDC I,24
CHK I,0,285
STO I
LDA 1,31892
LOC 2360
LDC I,9
CHK J,0,15
IXA 4
LDC I,25
CHK I,0,285
STO I
LDA 1,31892
LDC I,13
CHK J,0,15
IXA 4
LOC 2370
LDC I,0
CHK I,0,285
STO I
LDA 1,31892
LDC I,10
CHK J,0,15
IXA 4
LDC I,26
CHK I,0,285
STO I
LOC 2380
LDA 1,31892
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31892
LDC I,15
CHK J,0,15
LOC 2390
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,31892
LDC I,12
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2400
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,2
CHK J,0,15
IXA 4
LDC I,34
CHK I,0,285
LOC 2410
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,5
CHK J,0,15
IXA 4
LDC I,32
CHK I,0,285
LOC 2420
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,6
CHK J,0,15
IXA 4
LDC I,32
CHK I,0,285
LOC 2430
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,35
CHK I,0,285
LOC 2440
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,9
CHK J,0,15
IXA 4
LDC I,33
CHK I,0,285
LOC 2450
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,10
CHK J,0,15
IXA 4
LDC I,34
CHK I,0,285
LOC 2460
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2470
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,3
CHK J,0,15
IXA 4
LDC I,34
CHK I,0,285
LOC 2480
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,4
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2490
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,14
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2500
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,8
CHK J,0,15
IXA 4
LDC I,32
CHK I,0,285
LOC 2510
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,13
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2520
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2530
STO I
LDA 1,31956
LDC I,0
CHK J,0,1
IXA 64
LDC I,12
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2540
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,2
CHK J,0,15
IXA 4
LDC I,38
CHK I,0,285
LOC 2550
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,5
CHK J,0,15
IXA 4
LDC I,36
CHK I,0,285
LOC 2560
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,6
CHK J,0,15
IXA 4
LDC I,36
CHK I,0,285
LOC 2570
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,39
CHK I,0,285
LOC 2580
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,9
CHK J,0,15
IXA 4
LDC I,37
CHK I,0,285
LOC 2590
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,10
CHK J,0,15
IXA 4
LDC I,38
CHK I,0,285
LOC 2600
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,15
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2610
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,3
CHK J,0,15
IXA 4
LDC I,38
CHK I,0,285
LOC 2620
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,4
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2630
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,14
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2640
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,8
CHK J,0,15
IXA 4
LDC I,36
CHK I,0,285
LOC 2650
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,13
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2660
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,7
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2670
STO I
LDA 1,31956
LDC I,1
CHK J,0,1
IXA 64
LDC I,12
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
LOC 2680
STO I
RET P
L1 DEF 12
SST P INIT2230 3 0 0 0 0
LOC 0
INIT2230 ENT P,3,L1 INIT2 1 1 1
LOD I,1,4324
CHK I,0,15
STR I,2,20
LOD I,1,4320
CHK I,0,15
ORD
STR I,3,8
LOD I,2,20
ORD
LOC 10
LOD I,3,8
LEQ I
FJP L3
L2 LAB
LOD I,1,4324
CHK I,0,15
STR I,2,16
LOD I,1,4320
CHK I,0,15
ORD
STR I,3,12
LOC 20
LOD I,2,16
ORD
LOD I,3,12
LEQ I
FJP L5
L4 LAB
LDA 1,32084
LOD I,2,20
CHK J,0,15
IXA 64
LOD I,2,16
LOC 30
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,285
STO I
LDA 1,33108
LOD I,2,20
CHK J,0,15
IXA 64
LOD I,2,16
LOC 40
CHK J,0,15
IXA 4
LDC I,0
CHK I,0,15
STO I
LDA 1,34132
LOD I,2,20
CHK J,0,15
IXA 64
LOD I,2,16
LOC 50
CHK J,0,15
IXA 4
LDC I,1
CHK I,0,15
STO I
LOD I,2,16
ORD
LOD I,3,12
NEQ I
FJP L5
LOC 60
LOD I,2,16
INC I,1
CHK I,0,15
STR I,2,16
UJP L4
L5 LAB
LOD I,2,20
ORD
LOD I,3,8
NEQ I
FJP L3
LOC 70
LOD I,2,20
INC I,1
CHK I,0,15
STR I,2,20
UJP L2
L3 LAB
LDA 1,32084
LDC I,2
CHK J,0,15
IXA 64
LDC I,2
LOC 80
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,32084
LDC I,2
CHK J,0,15
IXA 64
LDC I,4
LOC 90
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,32084
LDC I,2
CHK J,0,15
IXA 64
LDC I,3
LOC 100
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,32084
LDC I,5
CHK J,0,15
IXA 64
LDC I,5
LOC 110
CHK J,0,15
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,32084
LDC I,6
CHK J,0,15
IXA 64
LDC I,6
LOC 120
CHK J,0,15
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,32084
LDC I,7
CHK J,0,15
IXA 64
LDC I,7
LOC 130
CHK J,0,15
IXA 4
LDC I,82
CHK I,0,285
STO I
LDA 1,32084
LDC I,12
CHK J,0,15
IXA 64
LDC I,12
LOC 140
CHK J,0,15
IXA 4
LDC I,82
CHK I,0,285
STO I
LDA 1,32084
LDC I,12
CHK J,0,15
IXA 64
LDC I,13
LOC 150
CHK J,0,15
IXA 4
LDC I,60
CHK I,0,285
STO I
LDA 1,32084
LDC I,13
CHK J,0,15
IXA 64
LDC I,12
LOC 160
CHK J,0,15
IXA 4
LDC I,59
CHK I,0,285
STO I
LDA 1,32084
LDC I,13
CHK J,0,15
IXA 64
LDC I,13
LOC 170
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,32084
LDC I,8
CHK J,0,15
IXA 64
LDC I,8
LOC 180
CHK J,0,15
IXA 4
LDC I,67
CHK I,0,285
STO I
LDA 1,32084
LDC I,8
CHK J,0,15
IXA 64
LDC I,9
LOC 190
CHK J,0,15
IXA 4
LDC I,270
CHK I,0,285
STO I
LDA 1,32084
LDC I,9
CHK J,0,15
IXA 64
LDC I,8
LOC 200
CHK J,0,15
IXA 4
LDC I,271
CHK I,0,285
STO I
LDA 1,32084
LDC I,9
CHK J,0,15
IXA 64
LDC I,9
LOC 210
CHK J,0,15
IXA 4
LDC I,70
CHK I,0,285
STO I
LDA 1,32084
LDC I,8
CHK J,0,15
IXA 64
LDC I,10
LOC 220
CHK J,0,15
IXA 4
LDC I,273
CHK I,0,285
STO I
LDA 1,32084
LDC I,9
CHK J,0,15
IXA 64
LDC I,10
LOC 230
CHK J,0,15
IXA 4
LDC I,274
CHK I,0,285
STO I
LDA 1,32084
LDC I,10
CHK J,0,15
IXA 64
LDC I,8
LOC 240
CHK J,0,15
IXA 4
LDC I,275
CHK I,0,285
STO I
LDA 1,32084
LDC I,10
CHK J,0,15
IXA 64
LDC I,9
LOC 250
CHK J,0,15
IXA 4
LDC I,276
CHK I,0,285
STO I
LDA 1,32084
LDC I,10
CHK J,0,15
IXA 64
LDC I,10
LOC 260
CHK J,0,15
IXA 4
LDC I,75
CHK I,0,285
STO I
LDA 1,32084
LDC I,8
CHK J,0,15
IXA 64
LDC I,11
LOC 270
CHK J,0,15
IXA 4
LDC I,278
CHK I,0,285
STO I
LDA 1,32084
LDC I,9
CHK J,0,15
IXA 64
LDC I,11
LOC 280
CHK J,0,15
IXA 4
LDC I,279
CHK I,0,285
STO I
LDA 1,32084
LDC I,10
CHK J,0,15
IXA 64
LDC I,11
LOC 290
CHK J,0,15
IXA 4
LDC I,280
CHK I,0,285
STO I
LDA 1,32084
LDC I,11
CHK J,0,15
IXA 64
LDC I,8
LOC 300
CHK J,0,15
IXA 4
LDC I,281
CHK I,0,285
STO I
LDA 1,32084
LDC I,11
CHK J,0,15
IXA 64
LDC I,9
LOC 310
CHK J,0,15
IXA 4
LDC I,282
CHK I,0,285
STO I
LDA 1,32084
LDC I,11
CHK J,0,15
IXA 64
LDC I,10
LOC 320
CHK J,0,15
IXA 4
LDC I,283
CHK I,0,285
STO I
LDA 1,32084
LDC I,11
CHK J,0,15
IXA 64
LDC I,11
LOC 330
CHK J,0,15
IXA 4
LDC I,82
CHK I,0,285
STO I
LDC I,8
CHK I,0,15
STR I,2,20
LDC I,10
CHK I,0,15
LOC 340
ORD
STR I,3,8
LOD I,2,20
ORD
LOD I,3,8
LEQ I
FJP L7
L6 LAB
LDC I,8
CHK I,0,15
STR I,2,16
LOC 350
LDC I,10
CHK I,0,15
ORD
STR I,3,12
LOD I,2,16
ORD
LOD I,3,12
LEQ I
FJP L9
L8 LAB
LDA 1,33108
LOC 360
LOD I,2,20
CHK J,0,15
IXA 64
LOD I,2,16
CHK J,0,15
IXA 4
LDC I,10
CHK I,0,15
STO I
LOD I,2,16
LOC 370
ORD
LOD I,3,12
NEQ I
FJP L9
LOD I,2,16
INC I,1
CHK I,0,15
STR I,2,16
UJP L8
L9 LAB
LOD I,2,20
LOC 380
ORD
LOD I,3,8
NEQ I
FJP L7
LOD I,2,20
INC I,1
CHK I,0,15
STR I,2,20
UJP L6
L7 LAB
LDC I,8
LOC 390
CHK I,0,15
STR I,2,24
LDC I,11
CHK I,0,15
ORD
STR I,3,8
LOD I,2,24
ORD
LOD I,3,8
LEQ I
LOC 400
FJP L11
L10 LAB
LDA 1,33108
LOD I,2,24
CHK J,0,15
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 410
STO I
LDA 1,33108
LDC I,11
CHK J,0,15
IXA 64
LOD I,2,24
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 420
STO I
LOD I,2,24
ORD
LOD I,3,8
NEQ I
FJP L11
LOD I,2,24
INC I,1
CHK I,0,15
STR I,2,24
LOC 430
UJP L10
L11 LAB
LDA 1,33108
LDC I,12
CHK J,0,15
IXA 64
LDC I,12
CHK J,0,15
IXA 4
LDC I,12
CHK I,0,15
LOC 440
STO I
LDA 1,33108
LDC I,12
CHK J,0,15
IXA 64
LDC I,13
CHK J,0,15
IXA 4
LDC I,12
CHK I,0,15
LOC 450
STO I
LDA 1,33108
LDC I,13
CHK J,0,15
IXA 64
LDC I,12
CHK J,0,15
IXA 4
LDC I,12
CHK I,0,15
LOC 460
STO I
LDA 1,33108
LDC I,13
CHK J,0,15
IXA 64
LDC I,13
CHK J,0,15
IXA 4
LDC I,13
CHK I,0,15
LOC 470
STO I
LDA 1,34132
LDC I,2
CHK J,0,15
IXA 64
LDC I,3
CHK J,0,15
IXA 4
LDC I,2
CHK I,0,15
LOC 480
STO I
LDA 1,34132
LDC I,3
CHK J,0,15
IXA 64
LDC I,2
CHK J,0,15
IXA 4
LDC I,2
CHK I,0,15
LOC 490
STO I
LDA 1,34132
LDC I,2
CHK J,0,15
IXA 64
LDC I,4
CHK J,0,15
IXA 4
LDC I,2
CHK I,0,15
LOC 500
STO I
LDA 1,34132
LDC I,4
CHK J,0,15
IXA 64
LDC I,2
CHK J,0,15
IXA 4
LDC I,2
CHK I,0,15
LOC 510
STO I
LDA 1,34132
LDC I,2
CHK J,0,15
IXA 64
LDC I,2
CHK J,0,15
IXA 4
LDC I,2
CHK I,0,15
LOC 520
STO I
LDA 1,34132
LDC I,12
CHK J,0,15
IXA 64
LDC I,12
CHK J,0,15
IXA 4
LDC I,12
CHK I,0,15
LOC 530
STO I
LDA 1,34132
LDC I,13
CHK J,0,15
IXA 64
LDC I,12
CHK J,0,15
IXA 4
LDC I,12
CHK I,0,15
LOC 540
STO I
LDA 1,34132
LDC I,12
CHK J,0,15
IXA 64
LDC I,13
CHK J,0,15
IXA 4
LDC I,12
CHK I,0,15
LOC 550
STO I
LDA 1,34132
LDC I,13
CHK J,0,15
IXA 64
LDC I,13
CHK J,0,15
IXA 4
LDC I,13
CHK I,0,15
LOC 560
STO I
LDA 1,34132
LDC I,8
CHK J,0,15
IXA 64
LDC I,8
CHK J,0,15
IXA 4
LDC I,8
CHK I,0,15
LOC 570
STO I
LDA 1,34132
LDC I,8
CHK J,0,15
IXA 64
LDC I,9
CHK J,0,15
IXA 4
LDC I,9
CHK I,0,15
LOC 580
STO I
LDA 1,34132
LDC I,9
CHK J,0,15
IXA 64
LDC I,8
CHK J,0,15
IXA 4
LDC I,9
CHK I,0,15
LOC 590
STO I
LDA 1,34132
LDC I,9
CHK J,0,15
IXA 64
LDC I,9
CHK J,0,15
IXA 4
LDC I,9
CHK I,0,15
LOC 600
STO I
LDA 1,34132
LDC I,8
CHK J,0,15
IXA 64
LDC I,10
CHK J,0,15
IXA 4
LDC I,10
CHK I,0,15
LOC 610
STO I
LDA 1,34132
LDC I,9
CHK J,0,15
IXA 64
LDC I,10
CHK J,0,15
IXA 4
LDC I,10
CHK I,0,15
LOC 620
STO I
LDA 1,34132
LDC I,10
CHK J,0,15
IXA 64
LDC I,8
CHK J,0,15
IXA 4
LDC I,10
CHK I,0,15
LOC 630
STO I
LDA 1,34132
LDC I,10
CHK J,0,15
IXA 64
LDC I,9
CHK J,0,15
IXA 4
LDC I,10
CHK I,0,15
LOC 640
STO I
LDA 1,34132
LDC I,10
CHK J,0,15
IXA 64
LDC I,10
CHK J,0,15
IXA 4
LDC I,10
CHK I,0,15
LOC 650
STO I
LDA 1,34132
LDC I,8
CHK J,0,15
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 660
STO I
LDA 1,34132
LDC I,9
CHK J,0,15
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 670
STO I
LDA 1,34132
LDC I,10
CHK J,0,15
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 680
STO I
LDA 1,34132
LDC I,11
CHK J,0,15
IXA 64
LDC I,8
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 690
STO I
LDA 1,34132
LDC I,11
CHK J,0,15
IXA 64
LDC I,9
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 700
STO I
LDA 1,34132
LDC I,11
CHK J,0,15
IXA 64
LDC I,10
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 710
STO I
LDA 1,34132
LDC I,11
CHK J,0,15
IXA 64
LDC I,11
CHK J,0,15
IXA 4
LDC I,11
CHK I,0,15
LOC 720
STO I
LDA 1,34132
LDC I,5
CHK J,0,15
IXA 64
LDC I,5
CHK J,0,15
IXA 4
LDC I,5
CHK I,0,15
LOC 730
STO I
LDA 1,34132
LDC I,6
CHK J,0,15
IXA 64
LDC I,6
CHK J,0,15
IXA 4
LDC I,6
CHK I,0,15
LOC 740
STO I
LDA 1,34132
LDC I,7
CHK J,0,15
IXA 64
LDC I,7
CHK J,0,15
IXA 4
LDC I,7
CHK I,0,15
LOC 750
STO I
LDA 1,35156
LDC I,3
CHK J,3,4
DEC I,3
IXA 16
LDC I,63
CHK J,63,66
DEC I,63
IXA 4
LOC 760
LDC I,47
CHK I,0,285
STO I
LDA 1,35156
LDC I,4
CHK J,3,4
DEC I,3
IXA 16
LDC I,63
CHK J,63,66
LOC 770
DEC I,63
IXA 4
LDC I,48
CHK I,0,285
STO I
LDA 1,35156
LDC I,3
CHK J,3,4
DEC I,3
IXA 16
LOC 780
LDC I,64
CHK J,63,66
DEC I,63
IXA 4
LDC I,49
CHK I,0,285
STO I
LDA 1,35156
LDC I,4
CHK J,3,4
LOC 790
DEC I,3
IXA 16
LDC I,64
CHK J,63,66
DEC I,63
IXA 4
LDC I,51
CHK I,0,285
STO I
LDA 1,35156
LOC 800
LDC I,3
CHK J,3,4
DEC I,3
IXA 16
LDC I,65
CHK J,63,66
DEC I,63
IXA 4
LDC I,53
CHK I,0,285
LOC 810
STO I
LDA 1,35156
LDC I,4
CHK J,3,4
DEC I,3
IXA 16
LDC I,65
CHK J,63,66
DEC I,63
IXA 4
LOC 820
LDC I,54
CHK I,0,285
STO I
LDA 1,35156
LDC I,3
CHK J,3,4
DEC I,3
IXA 16
LDC I,66
CHK J,63,66
LOC 830
DEC I,63
IXA 4
LDC I,55
CHK I,0,285
STO I
LDA 1,35156
LDC I,4
CHK J,3,4
DEC I,3
IXA 16
LOC 840
LDC I,66
CHK J,63,66
DEC I,63
IXA 4
LDC I,57
CHK I,0,285
STO I
LDA 1,35188
LDC I,1
CHK J,1,4
LOC 850
DEC I,1
IXA 24
LDC I,67
CHK J,67,72
DEC I,67
IXA 4
LDC I,169
CHK I,0,285
STO I
LDA 1,35188
LOC 860
LDC I,1
CHK J,1,4
DEC I,1
IXA 24
LDC I,68
CHK J,67,72
DEC I,67
IXA 4
LDC I,170
CHK I,0,285
LOC 870
STO I
LDA 1,35188
LDC I,1
CHK J,1,4
DEC I,1
IXA 24
LDC I,69
CHK J,67,72
DEC I,67
IXA 4
LOC 880
LDC I,171
CHK I,0,285
STO I
LDA 1,35188
LDC I,1
CHK J,1,4
DEC I,1
IXA 24
LDC I,70
CHK J,67,72
LOC 890
DEC I,67
IXA 4
LDC I,172
CHK I,0,285
STO I
LDA 1,35188
LDC I,1
CHK J,1,4
DEC I,1
IXA 24
LOC 900
LDC I,71
CHK J,67,72
DEC I,67
IXA 4
LDC I,173
CHK I,0,285
STO I
LDA 1,35188
LDC I,1
CHK J,1,4
LOC 910
DEC I,1
IXA 24
LDC I,72
CHK J,67,72
DEC I,67
IXA 4
LDC I,174
CHK I,0,285
STO I
LDA 1,35188
LOC 920
LDC I,2
CHK J,1,4
DEC I,1
IXA 24
LDC I,67
CHK J,67,72
DEC I,67
IXA 4
LDC I,175
CHK I,0,285
LOC 930
STO I
LDA 1,35188
LDC I,2
CHK J,1,4
DEC I,1
IXA 24
LDC I,68
CHK J,67,72
DEC I,67
IXA 4
LOC 940
LDC I,176
CHK I,0,285
STO I
LDA 1,35188
LDC I,2
CHK J,1,4
DEC I,1
IXA 24
LDC I,69
CHK J,67,72
LOC 950
DEC I,67
IXA 4
LDC I,177
CHK I,0,285
STO I
LDA 1,35188
LDC I,2
CHK J,1,4
DEC I,1
IXA 24
LOC 960
LDC I,70
CHK J,67,72
DEC I,67
IXA 4
LDC I,178
CHK I,0,285
STO I
LDA 1,35188
LDC I,2
CHK J,1,4
LOC 970
DEC I,1
IXA 24
LDC I,71
CHK J,67,72
DEC I,67
IXA 4
LDC I,179
CHK I,0,285
STO I
LDA 1,35188
LOC 980
LDC I,2
CHK J,1,4
DEC I,1
IXA 24
LDC I,72
CHK J,67,72
DEC I,67
IXA 4
LDC I,180
CHK I,0,285
LOC 990
STO I
LDA 1,35188
LDC I,3
CHK J,1,4
DEC I,1
IXA 24
LDC I,67
CHK J,67,72
DEC I,67
IXA 4
LOC 1000
LDC I,181
CHK I,0,285
STO I
LDA 1,35188
LDC I,3
CHK J,1,4
DEC I,1
IXA 24
LDC I,68
CHK J,67,72
LOC 1010
DEC I,67
IXA 4
LDC I,182
CHK I,0,285
STO I
LDA 1,35188
LDC I,3
CHK J,1,4
DEC I,1
IXA 24
LOC 1020
LDC I,69
CHK J,67,72
DEC I,67
IXA 4
LDC I,183
CHK I,0,285
STO I
LDA 1,35188
LDC I,3
CHK J,1,4
LOC 1030
DEC I,1
IXA 24
LDC I,70
CHK J,67,72
DEC I,67
IXA 4
LDC I,184
CHK I,0,285
STO I
LDA 1,35188
LOC 1040
LDC I,3
CHK J,1,4
DEC I,1
IXA 24
LDC I,71
CHK J,67,72
DEC I,67
IXA 4
LDC I,185
CHK I,0,285
LOC 1050
STO I
LDA 1,35188
LDC I,3
CHK J,1,4
DEC I,1
IXA 24
LDC I,72
CHK J,67,72
DEC I,67
IXA 4
LOC 1060
LDC I,186
CHK I,0,285
STO I
LDA 1,35188
LDC I,4
CHK J,1,4
DEC I,1
IXA 24
LDC I,67
CHK J,67,72
LOC 1070
DEC I,67
IXA 4
LDC I,187
CHK I,0,285
STO I
LDA 1,35188
LDC I,4
CHK J,1,4
DEC I,1
IXA 24
LOC 1080
LDC I,68
CHK J,67,72
DEC I,67
IXA 4
LDC I,188
CHK I,0,285
STO I
LDA 1,35188
LDC I,4
CHK J,1,4
LOC 1090
DEC I,1
IXA 24
LDC I,69
CHK J,67,72
DEC I,67
IXA 4
LDC I,189
CHK I,0,285
STO I
LDA 1,35188
LOC 1100
LDC I,4
CHK J,1,4
DEC I,1
IXA 24
LDC I,70
CHK J,67,72
DEC I,67
IXA 4
LDC I,190
CHK I,0,285
LOC 1110
STO I
LDA 1,35188
LDC I,4
CHK J,1,4
DEC I,1
IXA 24
LDC I,71
CHK J,67,72
DEC I,67
IXA 4
LOC 1120
LDC I,191
CHK I,0,285
STO I
LDA 1,35188
LDC I,4
CHK J,1,4
DEC I,1
IXA 24
LDC I,72
CHK J,67,72
LOC 1130
DEC I,67
IXA 4
LDC I,192
CHK I,0,285
STO I
LDA 1,35284
LDC I,67
CHK J,67,72
DEC I,67
IXA 4
LOC 1140
LDC I,17
CHK I,0,285
STO I
LDA 1,35284
LDC I,68
CHK J,67,72
DEC I,67
IXA 4
LDC I,18
CHK I,0,285
LOC 1150
STO I
LDA 1,35284
LDC I,69
CHK J,67,72
DEC I,67
IXA 4
LDC I,19
CHK I,0,285
STO I
LDA 1,35284
LOC 1160
LDC I,70
CHK J,67,72
DEC I,67
IXA 4
LDC I,20
CHK I,0,285
STO I
LDA 1,35284
LDC I,71
CHK J,67,72
LOC 1170
DEC I,67
IXA 4
LDC I,21
CHK I,0,285
STO I
LDA 1,35284
LDC I,72
CHK J,67,72
DEC I,67
IXA 4
LOC 1180
LDC I,22
CHK I,0,285
STO I
LDC I,1
STR I,2,12
LDC I,8
STR I,3,8
LOD I,2,12
LOD I,3,8
LEQ I
LOC 1190
FJP L13
L12 LAB
LDA 1,35500
LOD I,2,12
CHK J,1,8
DEC I,1
IXA 4
LDC I,29
LDC I,1
ADI
LOD I,2,12
LOC 1200
SBI
CHK I,0,31
STO I
LOD I,2,12
LOD I,3,8
NEQ I
FJP L13
LOD I,2,12
INC I,1
STR I,2,12
LOC 1210
UJP L12
L13 LAB
LDC I,0
STR I,2,12
LDC I,9
STR I,3,8
LOD I,2,12
LOD I,3,8
LEQ I
FJP L15
L14 LAB
LDA 1,35532
LOC 1220
LOD I,2,12
CHK J,0,9
IXA 4
LOD I,2,12
LDC I,8
ADI
CHK I,0,31
STO I
LOD I,2,12
LOD I,3,8
LOC 1230
NEQ I
FJP L15
LOD I,2,12
INC I,1
STR I,2,12
UJP L14
L15 LAB
LDC I,0
STR I,2,12
LDC I,31
STR I,3,8
LOC 1240
LOD I,2,12
LOD I,3,8
LEQ I
FJP L17
L16 LAB
LDA 1,35572
LOD I,2,12
CHK J,0,31
IXA 4
LDC I,1000000
STO I
LOC 1250
LOD I,2,12
LOD I,3,8
NEQ I
FJP L17
LOD I,2,12
INC I,1
STR I,2,12
UJP L16
L17 LAB
LDC I,8
STR I,2,12
LOC 1260
LDC I,9
LDC I,8
ADI
STR I,3,8
LOD I,2,12
LOD I,3,8
LEQ I
FJP L19
L18 LAB
LDA 1,35572
LOD I,2,12
LOC 1270
CHK J,0,31
IXA 4
LOD I,2,12
LDC I,8
SBI
STO I
LOD I,2,12
LOD I,3,8
NEQ I
FJP L19
LOC 1280
LOD I,2,12
INC I,1
STR I,2,12
UJP L18
L19 LAB
LDA 1,35700
LDC I,0
CHK J,0,2
IXA 4
LCA 'IS '
MOV 4
LOC 1290
LDA 1,35700
LDC I,1
CHK J,0,2
IXA 4
LCA 'DS '
MOV 4
LDA 1,35700
LDC I,2
CHK J,0,2
IXA 4
LOC 1300
LCA 'CM '
MOV 4
LDA 1,35712
LDC I,0
CHK J,0,3
IXA 4
LCA 'ST '
MOV 4
LDA 1,35712
LDC I,1
LOC 1310
CHK J,0,3
IXA 4
LCA 'IN '
MOV 4
LDA 1,35712
LDC I,2
CHK J,0,3
IXA 4
LCA 'DN '
MOV 4
LOC 1320
LDA 1,35712
LDC I,3
CHK J,0,3
IXA 4
LCA 'AN '
MOV 4
LDA 1,35728
LDC I,0
CHK J,0,3
IXA 4
LOC 1330
LCA 'IR '
MOV 4
LDA 1,35728
LDC I,1
CHK J,0,3
IXA 4
LCA 'DR '
MOV 4
LDA 1,35728
LDC I,2
LOC 1340
CHK J,0,3
IXA 4
LCA 'AR '
MOV 4
LDA 1,35728
LDC I,3
CHK J,0,3
IXA 4
LCA 'XR '
MOV 4
LOC 1350
LDA 1,35747
LDC I,0
CHK J,0,1
IXA 2
LCA '+ '
MOV 2
LDA 1,35747
LDC I,1
CHK J,0,1
IXA 2
LOC 1360
LCA '- '
MOV 2
LDA 1,35744
LDC I,0
CHK J,0,2
IXA 1
LDC C,'D'
CHK I,0,255
STO C
LDA 1,35744
LOC 1370
LDC I,1
CHK J,0,2
IXA 1
LDC C,'R'
CHK I,0,255
STO C
LDA 1,35744
LDC I,2
CHK J,0,2
IXA 1
LOC 1380
LDC C,'S'
CHK I,0,255
STO C
LDC I,0
STR I,2,12
LDC I,196
STR I,3,8
LOD I,2,12
LOD I,3,8
LEQ I
LOC 1390
FJP L21
L20 LAB
LDA 1,2744
LOD I,2,12
CHK J,0,196
IXA 8
LCA ' '
MOV 3
LOD I,2,12
LOD I,3,8
NEQ I
LOC 1400
FJP L21
LOD I,2,12
INC I,1
STR I,2,12
UJP L20
L21 LAB
MST 3,8,8
LCA 'ADR'
PAR A
LDC I,63
CHK I,0,72
LOC 1410
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SBR'
PAR A
LDC I,64
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1420
LCA 'MPR'
PAR A
LDC I,65
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'DVR'
PAR A
LDC I,66
LOC 1430
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'EQU'
PAR A
LDC I,67
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1440
MST 3,8,8
LCA 'NEQ'
PAR A
LDC I,68
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'GEQ'
PAR A
LOC 1450
LDC I,69
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'GRT'
PAR A
LDC I,70
CHK I,0,72
PAR I
LOC 1460
CUP P,4,ENTER227
MST 3,8,8
LCA 'LEQ'
PAR A
LDC I,71
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LES'
LOC 1470
PAR A
LDC I,72
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'ABI'
PAR A
LDC I,0
CHK I,0,72
LOC 1480
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'ABR'
PAR A
LDC I,1
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1490
LCA 'ADI'
PAR A
LDC I,2
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'AND'
PAR A
LDC I,3
LOC 1500
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'BGN'
PAR A
LDC I,4
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1510
MST 3,8,8
LCA 'CHK'
PAR A
LDC I,5
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'CHR'
PAR A
LOC 1520
LDC I,6
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'CSP'
PAR A
LDC I,7
CHK I,0,72
PAR I
LOC 1530
CUP P,4,ENTER227
MST 3,8,8
LCA 'CUP'
PAR A
LDC I,8
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'DEC'
LOC 1540
PAR A
LDC I,9
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'DEF'
PAR A
LDC I,10
CHK I,0,72
LOC 1550
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'DIF'
PAR A
LDC I,11
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1560
LCA 'DVI'
PAR A
LDC I,12
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'ENT'
PAR A
LDC I,13
LOC 1570
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'EOF'
PAR A
LDC I,14
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1580
MST 3,8,8
LCA 'FJP'
PAR A
LDC I,15
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'FLO'
PAR A
LOC 1590
LDC I,16
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'FLT'
PAR A
LDC I,17
CHK I,0,72
PAR I
LOC 1600
CUP P,4,ENTER227
MST 3,8,8
LCA 'INC'
PAR A
LDC I,18
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'IND'
LOC 1610
PAR A
LDC I,19
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'INN'
PAR A
LDC I,20
CHK I,0,72
LOC 1620
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'INT'
PAR A
LDC I,21
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1630
LCA 'IOR'
PAR A
LDC I,22
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'IXA'
PAR A
LDC I,23
LOC 1640
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LAB'
PAR A
LDC I,24
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1650
MST 3,8,8
LCA 'LAO'
PAR A
LDC I,25
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LAB'
PAR A
LOC 1660
LDC I,24
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LCA'
PAR A
LDC I,26
CHK I,0,72
PAR I
LOC 1670
CUP P,4,ENTER227
MST 3,8,8
LCA 'LDA'
PAR A
LDC I,27
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LDC'
LOC 1680
PAR A
LDC I,28
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LDO'
PAR A
LDC I,29
CHK I,0,72
LOC 1690
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'LOC'
PAR A
LDC I,30
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1700
LCA 'LOD'
PAR A
LDC I,31
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'MOD'
PAR A
LDC I,32
LOC 1710
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'MOV'
PAR A
LDC I,33
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1720
MST 3,8,8
LCA 'MPI'
PAR A
LDC I,34
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'MST'
PAR A
LOC 1730
LDC I,35
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'NEW'
PAR A
LDC I,36
CHK I,0,72
PAR I
LOC 1740
CUP P,4,ENTER227
MST 3,8,8
LCA 'NGI'
PAR A
LDC I,37
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'NGR'
LOC 1750
PAR A
LDC I,38
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'NOT'
PAR A
LDC I,39
CHK I,0,72
LOC 1760
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'ODD'
PAR A
LDC I,40
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1770
LCA 'ORD'
PAR A
LDC I,41
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'PAR'
PAR A
LDC I,42
LOC 1780
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'PRE'
PAR A
LDC I,43
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1790
MST 3,8,8
LCA 'RET'
PAR A
LDC I,44
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'RST'
PAR A
LOC 1800
LDC I,45
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SAV'
PAR A
LDC I,46
CHK I,0,72
PAR I
LOC 1810
CUP P,4,ENTER227
MST 3,8,8
LCA 'SBI'
PAR A
LDC I,47
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SGS'
LOC 1820
PAR A
LDC I,48
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SQI'
PAR A
LDC I,49
CHK I,0,72
LOC 1830
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SQR'
PAR A
LDC I,50
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1840
LCA 'SRO'
PAR A
LDC I,51
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SST'
PAR A
LDC I,52
LOC 1850
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'STO'
PAR A
LDC I,53
CHK I,0,72
PAR I
CUP P,4,ENTER227
LOC 1860
MST 3,8,8
LCA 'STP'
PAR A
LDC I,54
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'STR'
PAR A
LOC 1870
LDC I,55
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'SUC'
PAR A
LDC I,56
CHK I,0,72
PAR I
LOC 1880
CUP P,4,ENTER227
MST 3,8,8
LCA 'TOF'
PAR A
LDC I,57
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'TON'
LOC 1890
PAR A
LDC I,58
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'TRC'
PAR A
LDC I,59
CHK I,0,72
LOC 1900
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'UJP'
PAR A
LDC I,60
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LOC 1910
LCA 'UNI'
PAR A
LDC I,61
CHK I,0,72
PAR I
CUP P,4,ENTER227
MST 3,8,8
LCA 'XJP'
PAR A
LDC I,62
LOC 1920
CHK I,0,72
PAR I
CUP P,4,ENTER227
RET P
L1 DEF 16
SST P INIT3231 3 0 0 0 0
LOC 0
INIT3231 ENT P,3,L1 INIT3 1 1 1
LDC I,0
STR I,2,12
LDC I,90
STR I,3,8
LOD I,2,12
LOD I,3,8
LEQ I
FJP L3
L2 LAB
LDA 1,1288
LOC 10
LOD I,2,12
CHK J,0,90
IXA 16
LCA ' '
MOV 8
LDA 1,1288
LOD I,2,12
CHK J,0,90
IXA 16
INC A,8
LOC 20
LDC I,1
CHK I,1,8
STO I
LOD I,2,12
LOD I,3,8
NEQ I
FJP L3
LOD I,2,12
INC I,1
STR I,2,12
LOC 30
UJP L2
L3 LAB
MST 3,8,8
LCA 'ATN'
PAR A
LDC I,0
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'EXP'
LOC 40
PAR A
LDC I,6
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'SIN'
PAR A
LDC I,21
CHK I,0,31
LOC 50
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'COS'
PAR A
LDC I,2
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LOC 60
LCA 'LOG'
PAR A
LDC I,8
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'SQT'
PAR A
LDC I,23
LOC 70
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'CLK'
PAR A
LDC I,1
CHK I,0,31
PAR I
CUP P,4,ENTER228
LOC 80
MST 3,8,8
LCA 'XIT'
PAR A
LDC I,31
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'TRP'
PAR A
LOC 90
LDC I,24
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'GET'
PAR A
LDC I,7
CHK I,0,31
PAR I
LOC 100
CUP P,4,ENTER228
MST 3,8,8
LCA 'PUT'
PAR A
LDC I,10
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'RLN'
LOC 110
PAR A
LDC I,18
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'WLN'
PAR A
LDC I,25
CHK I,0,31
LOC 120
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'RES'
PAR A
LDC I,16
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LOC 130
LCA 'REW'
PAR A
LDC I,17
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'RDC'
PAR A
LDC I,12
LOC 140
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'RDI'
PAR A
LDC I,13
CHK I,0,31
PAR I
CUP P,4,ENTER228
LOC 150
MST 3,8,8
LCA 'RDR'
PAR A
LDC I,14
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'RDS'
PAR A
LOC 160
LDC I,15
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'WRC'
PAR A
LDC I,27
CHK I,0,31
PAR I
LOC 170
CUP P,4,ENTER228
MST 3,8,8
LCA 'RDB'
PAR A
LDC I,11
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'WRB'
LOC 180
PAR A
LDC I,26
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'WRI'
PAR A
LDC I,28
CHK I,0,31
LOC 190
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'WRR'
PAR A
LDC I,29
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LOC 200
LCA 'WRS'
PAR A
LDC I,30
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'ELN'
PAR A
LDC I,4
LOC 210
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'EOF'
PAR A
LDC I,5
CHK I,0,31
PAR I
CUP P,4,ENTER228
LOC 220
MST 3,8,8
LCA 'SIO'
PAR A
LDC I,22
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'EIO'
PAR A
LOC 230
LDC I,3
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'NEW'
PAR A
LDC I,9
CHK I,0,31
PAR I
LOC 240
CUP P,4,ENTER228
MST 3,8,8
LCA 'SAV'
PAR A
LDC I,20
CHK I,0,31
PAR I
CUP P,4,ENTER228
MST 3,8,8
LCA 'RST'
LOC 250
PAR A
LDC I,19
CHK I,0,31
PAR I
CUP P,4,ENTER228
LOD I,1,4332
CHK I,0,285
STR I,2,28
LOD I,1,4328
CHK I,0,285
LOC 260
ORD
STR I,3,8
LOD I,2,28
ORD
LOD I,3,8
LEQ I
FJP L5
L4 LAB
LDA 1,22584
LOD I,2,28
CHK J,0,285
LOC 270
IXA 4
LDC I,0
CHK I,0,285
STO I
LOD I,2,28
ORD
LOD I,3,8
NEQ I
FJP L5
LOD I,2,28
LOC 280
INC I,1
CHK I,0,285
STR I,2,28
UJP L4
L5 LAB
LDA 1,22584
LDC I,8
CHK J,0,285
IXA 4
LDC I,8
CHK I,0,285
LOC 290
STO I
LDA 1,22584
LDC I,9
CHK J,0,285
IXA 4
LDC I,9
CHK I,0,285
STO I
LDA 1,22584
LDC I,13
LOC 300
CHK J,0,285
IXA 4
LDC I,13
CHK I,0,285
STO I
LDA 1,22584
LDC I,14
CHK J,0,285
IXA 4
LDC I,14
LOC 310
CHK I,0,285
STO I
LDA 1,22584
LDC I,15
CHK J,0,285
IXA 4
LDC I,16
CHK I,0,285
STO I
LDA 1,22584
LOC 320
LDC I,16
CHK J,0,285
IXA 4
LDC I,15
CHK I,0,285
STO I
LDA 1,22584
LDC I,47
CHK J,0,285
IXA 4
LOC 330
LDC I,47
CHK I,0,285
STO I
LDA 1,22584
LDC I,48
CHK J,0,285
IXA 4
LDC I,48
CHK I,0,285
STO I
LOC 340
LDA 1,22584
LDC I,49
CHK J,0,285
IXA 4
LDC I,50
CHK I,0,285
STO I
LDA 1,22584
LDC I,50
CHK J,0,285
LOC 350
IXA 4
LDC I,49
CHK I,0,285
STO I
LDA 1,22584
LDC I,51
CHK J,0,285
IXA 4
LDC I,52
CHK I,0,285
LOC 360
STO I
LDA 1,22584
LDC I,52
CHK J,0,285
IXA 4
LDC I,51
CHK I,0,285
STO I
LDA 1,22584
LDC I,53
LOC 370
CHK J,0,285
IXA 4
LDC I,53
CHK I,0,285
STO I
LDA 1,22584
LDC I,54
CHK J,0,285
IXA 4
LDC I,54
LOC 380
CHK I,0,285
STO I
LDA 1,22584
LDC I,55
CHK J,0,285
IXA 4
LDC I,56
CHK I,0,285
STO I
LDA 1,22584
LOC 390
LDC I,56
CHK J,0,285
IXA 4
LDC I,55
CHK I,0,285
STO I
LDA 1,22584
LDC I,57
CHK J,0,285
IXA 4
LOC 400
LDC I,58
CHK I,0,285
STO I
LDA 1,22584
LDC I,58
CHK J,0,285
IXA 4
LDC I,57
CHK I,0,285
STO I
LOC 410
LDA 1,22584
LDC I,147
CHK J,0,285
IXA 4
LDC I,147
CHK I,0,285
STO I
LDA 1,22584
LDC I,148
CHK J,0,285
LOC 420
IXA 4
LDC I,148
CHK I,0,285
STO I
LDA 1,22584
LDC I,153
CHK J,0,285
IXA 4
LDC I,153
CHK I,0,285
LOC 430
STO I
LDA 1,22584
LDC I,154
CHK J,0,285
IXA 4
LDC I,154
CHK I,0,285
STO I
LDA 1,22584
LDC I,155
LOC 440
CHK J,0,285
IXA 4
LDC I,155
CHK I,0,285
STO I
LDA 1,22584
LDC I,156
CHK J,0,285
IXA 4
LDC I,157
LOC 450
CHK I,0,285
STO I
LDA 1,22584
LDC I,157
CHK J,0,285
IXA 4
LDC I,156
CHK I,0,285
STO I
LDA 1,22584
LOC 460
LDC I,158
CHK J,0,285
IXA 4
LDC I,159
CHK I,0,285
STO I
LDA 1,22584
LDC I,159
CHK J,0,285
IXA 4
LOC 470
LDC I,158
CHK I,0,285
STO I
LDA 1,22584
LDC I,160
CHK J,0,285
IXA 4
LDC I,161
CHK I,0,285
STO I
LOC 480
LDA 1,22584
LDC I,161
CHK J,0,285
IXA 4
LDC I,160
CHK I,0,285
STO I
LDA 1,22584
LDC I,162
CHK J,0,285
LOC 490
IXA 4
LDC I,163
CHK I,0,285
STO I
LDA 1,22584
LDC I,163
CHK J,0,285
IXA 4
LDC I,162
CHK I,0,285
LOC 500
STO I
LDA 1,22584
LDC I,165
CHK J,0,285
IXA 4
LDC I,166
CHK I,0,285
STO I
LDA 1,22584
LDC I,166
LOC 510
CHK J,0,285
IXA 4
LDC I,165
CHK I,0,285
STO I
LDA 1,22584
LDC I,167
CHK J,0,285
IXA 4
LDC I,168
LOC 520
CHK I,0,285
STO I
LDA 1,22584
LDC I,168
CHK J,0,285
IXA 4
LDC I,167
CHK I,0,285
STO I
LDA 1,22584
LOC 530
LDC I,265
CHK J,0,285
IXA 4
LDC I,266
CHK I,0,285
STO I
LDA 1,22584
LDC I,266
CHK J,0,285
IXA 4
LOC 540
LDC I,265
CHK I,0,285
STO I
LDA 1,22584
LDC I,267
CHK J,0,285
IXA 4
LDC I,268
CHK I,0,285
STO I
LOC 550
LDA 1,22584
LDC I,268
CHK J,0,285
IXA 4
LDC I,267
CHK I,0,285
STO I
LDA 1,22584
LDC I,285
CHK J,0,285
LOC 560
IXA 4
LDC I,285
CHK I,0,285
STO I
LDA 1,23728
LDC I,0
CHK J,0,285
IXA 4
LDC I,0
CHK I,0,4
LOC 570
STO I
LDA 1,23728
LDC I,1
CHK J,0,285
IXA 4
LDC I,0
CHK I,0,4
STO I
LDA 1,23728
LDC I,2
LOC 580
CHK J,0,285
IXA 4
LDC I,0
CHK I,0,4
STO I
LDA 1,23728
LDC I,3
CHK J,0,285
IXA 4
LDC I,0
LOC 590
CHK I,0,4
STO I
LDA 1,23728
LDC I,4
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 600
LDC I,5
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,6
CHK J,0,285
IXA 4
LOC 610
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,7
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 620
LDA 1,23728
LDC I,8
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,9
CHK J,0,285
LOC 630
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,10
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 640
STO I
LDA 1,23728
LDC I,11
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,12
LOC 650
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,13
CHK J,0,285
IXA 4
LDC I,1
LOC 660
CHK I,0,4
STO I
LDA 1,23728
LDC I,14
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LOC 670
LDC I,15
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,16
CHK J,0,285
IXA 4
LOC 680
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,17
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 690
LDA 1,23728
LDC I,18
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,19
CHK J,0,285
LOC 700
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,20
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 710
STO I
LDA 1,23728
LDC I,21
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,22
LOC 720
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,23
CHK J,0,285
IXA 4
LDC I,3
LOC 730
CHK I,0,4
STO I
LDA 1,23728
LDC I,24
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 740
LDC I,25
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,26
CHK J,0,285
IXA 4
LOC 750
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,27
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 760
LDA 1,23728
LDC I,28
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,29
CHK J,0,285
LOC 770
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,30
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 780
STO I
LDA 1,23728
LDC I,31
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,32
LOC 790
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,33
CHK J,0,285
IXA 4
LDC I,3
LOC 800
CHK I,0,4
STO I
LDA 1,23728
LDC I,34
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 810
LDC I,35
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,36
CHK J,0,285
IXA 4
LOC 820
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,37
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 830
LDA 1,23728
LDC I,38
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,39
CHK J,0,285
LOC 840
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,40
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 850
STO I
LDA 1,23728
LDC I,41
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,42
LOC 860
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,43
CHK J,0,285
IXA 4
LDC I,3
LOC 870
CHK I,0,4
STO I
LDA 1,23728
LDC I,44
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 880
LDC I,45
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,46
CHK J,0,285
IXA 4
LOC 890
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,47
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 900
LDA 1,23728
LDC I,48
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,49
CHK J,0,285
LOC 910
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,50
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
LOC 920
STO I
LDA 1,23728
LDC I,51
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,52
LOC 930
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,53
CHK J,0,285
IXA 4
LDC I,1
LOC 940
CHK I,0,4
STO I
LDA 1,23728
LDC I,54
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LOC 950
LDC I,55
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,56
CHK J,0,285
IXA 4
LOC 960
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,57
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 970
LDA 1,23728
LDC I,58
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,59
CHK J,0,285
LOC 980
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,60
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 990
STO I
LDA 1,23728
LDC I,61
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,23728
LDC I,62
LOC 1000
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,63
CHK J,0,285
IXA 4
LDC I,2
LOC 1010
CHK I,0,4
STO I
LDA 1,23728
LDC I,64
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,23728
LOC 1020
LDC I,65
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,23728
LDC I,66
CHK J,0,285
IXA 4
LOC 1030
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,67
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1040
LDA 1,23728
LDC I,68
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,69
CHK J,0,285
LOC 1050
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,70
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1060
STO I
LDA 1,23728
LDC I,71
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,72
LOC 1070
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,73
CHK J,0,285
IXA 4
LDC I,3
LOC 1080
CHK I,0,4
STO I
LDA 1,23728
LDC I,74
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1090
LDC I,75
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,76
CHK J,0,285
IXA 4
LOC 1100
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,77
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1110
LDA 1,23728
LDC I,78
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,79
CHK J,0,285
LOC 1120
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,80
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1130
STO I
LDA 1,23728
LDC I,81
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,82
LOC 1140
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,83
CHK J,0,285
IXA 4
LDC I,3
LOC 1150
CHK I,0,4
STO I
LDA 1,23728
LDC I,84
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1160
LDC I,85
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,86
CHK J,0,285
IXA 4
LOC 1170
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,87
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1180
LDA 1,23728
LDC I,88
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,89
CHK J,0,285
LOC 1190
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,90
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1200
STO I
LDA 1,23728
LDC I,91
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,92
LOC 1210
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,93
CHK J,0,285
IXA 4
LDC I,3
LOC 1220
CHK I,0,4
STO I
LDA 1,23728
LDC I,94
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1230
LDC I,95
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,96
CHK J,0,285
IXA 4
LOC 1240
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,97
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1250
LDA 1,23728
LDC I,98
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,99
CHK J,0,285
LOC 1260
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,100
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1270
STO I
LDA 1,23728
LDC I,101
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,102
LOC 1280
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,103
CHK J,0,285
IXA 4
LDC I,3
LOC 1290
CHK I,0,4
STO I
LDA 1,23728
LDC I,104
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1300
LDC I,105
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,106
CHK J,0,285
IXA 4
LOC 1310
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,107
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1320
LDA 1,23728
LDC I,108
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,109
CHK J,0,285
LOC 1330
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,110
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1340
STO I
LDA 1,23728
LDC I,111
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,112
LOC 1350
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,113
CHK J,0,285
IXA 4
LDC I,3
LOC 1360
CHK I,0,4
STO I
LDA 1,23728
LDC I,114
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1370
LDC I,115
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,116
CHK J,0,285
IXA 4
LOC 1380
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,117
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1390
LDA 1,23728
LDC I,118
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,119
CHK J,0,285
LOC 1400
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,120
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1410
STO I
LDA 1,23728
LDC I,121
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,122
LOC 1420
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,123
CHK J,0,285
IXA 4
LDC I,3
LOC 1430
CHK I,0,4
STO I
LDA 1,23728
LDC I,124
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1440
LDC I,125
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,126
CHK J,0,285
IXA 4
LOC 1450
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,127
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1460
LDA 1,23728
LDC I,128
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,129
CHK J,0,285
LOC 1470
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,130
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1480
STO I
LDA 1,23728
LDC I,131
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,132
LOC 1490
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,133
CHK J,0,285
IXA 4
LDC I,3
LOC 1500
CHK I,0,4
STO I
LDA 1,23728
LDC I,134
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1510
LDC I,135
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,136
CHK J,0,285
IXA 4
LOC 1520
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,137
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 1530
LDA 1,23728
LDC I,138
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,139
CHK J,0,285
LOC 1540
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,140
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1550
STO I
LDA 1,23728
LDC I,141
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,142
LOC 1560
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,143
CHK J,0,285
IXA 4
LDC I,3
LOC 1570
CHK I,0,4
STO I
LDA 1,23728
LDC I,144
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1580
LDC I,145
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,146
CHK J,0,285
IXA 4
LOC 1590
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,147
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 1600
LDA 1,23728
LDC I,148
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,149
CHK J,0,285
LOC 1610
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,150
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1620
STO I
LDA 1,23728
LDC I,151
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,152
LOC 1630
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,153
CHK J,0,285
IXA 4
LDC I,3
LOC 1640
CHK I,0,4
STO I
LDA 1,23728
LDC I,154
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LOC 1650
LDC I,155
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,156
CHK J,0,285
IXA 4
LOC 1660
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,157
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 1670
LDA 1,23728
LDC I,158
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,159
CHK J,0,285
LOC 1680
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,160
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
LOC 1690
STO I
LDA 1,23728
LDC I,161
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,162
LOC 1700
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,163
CHK J,0,285
IXA 4
LDC I,1
LOC 1710
CHK I,0,4
STO I
LDA 1,23728
LDC I,164
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 1720
LDC I,165
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,166
CHK J,0,285
IXA 4
LOC 1730
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,167
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 1740
LDA 1,23728
LDC I,168
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,169
CHK J,0,285
LOC 1750
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,170
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 1760
STO I
LDA 1,23728
LDC I,171
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,172
LOC 1770
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,173
CHK J,0,285
IXA 4
LDC I,4
LOC 1780
CHK I,0,4
STO I
LDA 1,23728
LDC I,174
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LOC 1790
LDC I,175
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,176
CHK J,0,285
IXA 4
LOC 1800
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,177
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 1810
LDA 1,23728
LDC I,178
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,179
CHK J,0,285
LOC 1820
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,180
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 1830
STO I
LDA 1,23728
LDC I,181
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,182
LOC 1840
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,183
CHK J,0,285
IXA 4
LDC I,4
LOC 1850
CHK I,0,4
STO I
LDA 1,23728
LDC I,184
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LOC 1860
LDC I,185
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,186
CHK J,0,285
IXA 4
LOC 1870
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,187
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 1880
LDA 1,23728
LDC I,188
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,189
CHK J,0,285
LOC 1890
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,190
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 1900
STO I
LDA 1,23728
LDC I,191
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,192
LOC 1910
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,193
CHK J,0,285
IXA 4
LDC I,4
LOC 1920
CHK I,0,4
STO I
LDA 1,23728
LDC I,194
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LOC 1930
LDC I,195
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,196
CHK J,0,285
IXA 4
LOC 1940
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,197
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 1950
LDA 1,23728
LDC I,198
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,199
CHK J,0,285
LOC 1960
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,23728
LDC I,200
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 1970
STO I
LDA 1,23728
LDC I,201
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,202
LOC 1980
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,203
CHK J,0,285
IXA 4
LDC I,3
LOC 1990
CHK I,0,4
STO I
LDA 1,23728
LDC I,204
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2000
LDC I,205
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,206
CHK J,0,285
IXA 4
LOC 2010
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,207
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2020
LDA 1,23728
LDC I,208
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,209
CHK J,0,285
LOC 2030
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,210
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2040
STO I
LDA 1,23728
LDC I,211
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,212
LOC 2050
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,213
CHK J,0,285
IXA 4
LDC I,3
LOC 2060
CHK I,0,4
STO I
LDA 1,23728
LDC I,214
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2070
LDC I,215
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,216
CHK J,0,285
IXA 4
LOC 2080
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,217
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2090
LDA 1,23728
LDC I,218
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,219
CHK J,0,285
LOC 2100
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,220
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2110
STO I
LDA 1,23728
LDC I,221
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,222
LOC 2120
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,223
CHK J,0,285
IXA 4
LDC I,3
LOC 2130
CHK I,0,4
STO I
LDA 1,23728
LDC I,224
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2140
LDC I,225
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,226
CHK J,0,285
IXA 4
LOC 2150
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,227
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2160
LDA 1,23728
LDC I,228
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,229
CHK J,0,285
LOC 2170
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,230
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2180
STO I
LDA 1,23728
LDC I,231
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,232
LOC 2190
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,233
CHK J,0,285
IXA 4
LDC I,3
LOC 2200
CHK I,0,4
STO I
LDA 1,23728
LDC I,234
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2210
LDC I,235
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,236
CHK J,0,285
IXA 4
LOC 2220
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,237
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2230
LDA 1,23728
LDC I,238
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,239
CHK J,0,285
LOC 2240
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,240
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2250
STO I
LDA 1,23728
LDC I,241
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,242
LOC 2260
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,243
CHK J,0,285
IXA 4
LDC I,3
LOC 2270
CHK I,0,4
STO I
LDA 1,23728
LDC I,244
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2280
LDC I,245
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,246
CHK J,0,285
IXA 4
LOC 2290
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,247
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2300
LDA 1,23728
LDC I,248
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,249
CHK J,0,285
LOC 2310
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,250
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2320
STO I
LDA 1,23728
LDC I,251
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,252
LOC 2330
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,253
CHK J,0,285
IXA 4
LDC I,3
LOC 2340
CHK I,0,4
STO I
LDA 1,23728
LDC I,254
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2350
LDC I,255
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,256
CHK J,0,285
IXA 4
LOC 2360
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,257
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2370
LDA 1,23728
LDC I,258
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,259
CHK J,0,285
LOC 2380
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,260
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2390
STO I
LDA 1,23728
LDC I,261
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,262
LOC 2400
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,263
CHK J,0,285
IXA 4
LDC I,3
LOC 2410
CHK I,0,4
STO I
LDA 1,23728
LDC I,264
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2420
LDC I,265
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,266
CHK J,0,285
IXA 4
LOC 2430
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,267
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 2440
LDA 1,23728
LDC I,268
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,23728
LDC I,269
CHK J,0,285
LOC 2450
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,270
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2460
STO I
LDA 1,23728
LDC I,271
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,272
LOC 2470
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,273
CHK J,0,285
IXA 4
LDC I,3
LOC 2480
CHK I,0,4
STO I
LDA 1,23728
LDC I,274
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2490
LDC I,275
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,276
CHK J,0,285
IXA 4
LOC 2500
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,277
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 2510
LDA 1,23728
LDC I,278
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,279
CHK J,0,285
LOC 2520
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,280
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 2530
STO I
LDA 1,23728
LDC I,281
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,282
LOC 2540
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LDC I,283
CHK J,0,285
IXA 4
LDC I,3
LOC 2550
CHK I,0,4
STO I
LDA 1,23728
LDC I,284
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,23728
LOC 2560
LDC I,285
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
RET P
L1 DEF 12
SST P INIT4232 3 0 0 0 0
LOC 0
INIT4232 ENT P,3,L1 INIT4 1 1 1
LDA 1,24872
LDC I,0
CHK J,0,285
IXA 15
LCA 'ILLEGAL '
MOV 15
LDA 1,24872
LDC I,1
CHK J,0,285
LOC 10
IXA 15
LCA 'PLOC '
MOV 15
LDA 1,24872
LDC I,2
CHK J,0,285
IXA 15
LCA 'S1LOC '
MOV 15
LDA 1,24872
LOC 20
LDC I,3
CHK J,0,285
IXA 15
LCA 'FREEREG '
MOV 15
LDA 1,24872
LDC I,4
CHK J,0,285
IXA 15
LCA 'ABS.Q '
LOC 30
MOV 15
LDA 1,24872
LDC I,5
CHK J,0,285
IXA 15
LCA 'ABS.H '
MOV 15
LDA 1,24872
LDC I,6
CHK J,0,285
LOC 40
IXA 15
LCA 'ABS.S '
MOV 15
LDA 1,24872
LDC I,7
CHK J,0,285
IXA 15
LCA 'ABS.D '
MOV 15
LDA 1,24872
LOC 50
LDC I,8
CHK J,0,285
IXA 15
LCA 'ADD.S '
MOV 15
LDA 1,24872
LDC I,9
CHK J,0,285
IXA 15
LCA 'ADD.D '
LOC 60
MOV 15
LDA 1,24872
LDC I,10
CHK J,0,285
IXA 15
LCA 'ADJSP.UP '
MOV 15
LDA 1,24872
LDC I,11
CHK J,0,285
LOC 70
IXA 15
LCA 'ADJSP.DN '
MOV 15
LDA 1,24872
LDC I,12
CHK J,0,285
IXA 15
LCA 'ALLOC.1 '
MOV 15
LDA 1,24872
LOC 80
LDC I,13
CHK J,0,285
IXA 15
LCA 'AND.Q '
MOV 15
LDA 1,24872
LDC I,14
CHK J,0,285
IXA 15
LCA 'AND.D '
LOC 90
MOV 15
LDA 1,24872
LDC I,15
CHK J,0,285
IXA 15
LCA 'ANDTC.D '
MOV 15
LDA 1,24872
LDC I,16
CHK J,0,285
LOC 100
IXA 15
LCA 'ANDCT.D '
MOV 15
LDA 1,24872
LDC I,17
CHK J,0,285
IXA 15
LCA 'BLKCMP.EQL.Q '
MOV 15
LDA 1,24872
LOC 110
LDC I,18
CHK J,0,285
IXA 15
LCA 'BLKCMP.NEQ.Q '
MOV 15
LDA 1,24872
LDC I,19
CHK J,0,285
IXA 15
LCA 'BLKCMP.GEQ.Q '
LOC 120
MOV 15
LDA 1,24872
LDC I,20
CHK J,0,285
IXA 15
LCA 'BLKCMP.GTR.Q '
MOV 15
LDA 1,24872
LDC I,21
CHK J,0,285
LOC 130
IXA 15
LCA 'BLKCMP.LEQ.Q '
MOV 15
LDA 1,24872
LDC I,22
CHK J,0,285
IXA 15
LCA 'BLKCMP.LSS.Q '
MOV 15
LDA 1,24872
LOC 140
LDC I,23
CHK J,0,285
IXA 15
LCA 'BLKMOV '
MOV 15
LDA 1,24872
LDC I,24
CHK J,0,285
IXA 15
LCA 'BNDTRP.B.Q '
LOC 150
MOV 15
LDA 1,24872
LDC I,25
CHK J,0,285
IXA 15
LCA 'BNDTRP.B.H '
MOV 15
LDA 1,24872
LDC I,26
CHK J,0,285
LOC 160
IXA 15
LCA 'BNDTRP.B.S '
MOV 15
LDA 1,24872
LDC I,27
CHK J,0,285
IXA 15
LCA 'BNDTRP.B.D '
MOV 15
LDA 1,24872
LOC 170
LDC I,28
CHK J,0,285
IXA 15
LCA 'BNDTRP.M1.Q '
MOV 15
LDA 1,24872
LDC I,29
CHK J,0,285
IXA 15
LCA 'BNDTRP.M1.H '
LOC 180
MOV 15
LDA 1,24872
LDC I,30
CHK J,0,285
IXA 15
LCA 'BNDTRP.M1.S '
MOV 15
LDA 1,24872
LDC I,31
CHK J,0,285
LOC 190
IXA 15
LCA 'BNDTRP.M1.D '
MOV 15
LDA 1,24872
LDC I,32
CHK J,0,285
IXA 15
LCA 'BNDTRP.0.Q '
MOV 15
LDA 1,24872
LOC 200
LDC I,33
CHK J,0,285
IXA 15
LCA 'BNDTRP.0.H '
MOV 15
LDA 1,24872
LDC I,34
CHK J,0,285
IXA 15
LCA 'BNDTRP.0.S '
LOC 210
MOV 15
LDA 1,24872
LDC I,35
CHK J,0,285
IXA 15
LCA 'BNDTRP.0.D '
MOV 15
LDA 1,24872
LDC I,36
CHK J,0,285
LOC 220
IXA 15
LCA 'BNDTRP.1.Q '
MOV 15
LDA 1,24872
LDC I,37
CHK J,0,285
IXA 15
LCA 'BNDTRP.1.H '
MOV 15
LDA 1,24872
LOC 230
LDC I,38
CHK J,0,285
IXA 15
LCA 'BNDTRP.1.S '
MOV 15
LDA 1,24872
LDC I,39
CHK J,0,285
IXA 15
LCA 'BNDTRP.1.D '
LOC 240
MOV 15
LDA 1,24872
LDC I,40
CHK J,0,285
IXA 15
LCA 'DEC.S '
MOV 15
LDA 1,24872
LDC I,41
CHK J,0,285
LOC 250
IXA 15
LCA 'FIX.DM.S.S '
MOV 15
LDA 1,24872
LDC I,42
CHK J,0,285
IXA 15
LCA 'FIX.DM.S.D '
MOV 15
LDA 1,24872
LOC 260
LDC I,43
CHK J,0,285
IXA 15
LCA 'FLOAT.S.Q '
MOV 15
LDA 1,24872
LDC I,44
CHK J,0,285
IXA 15
LCA 'FLOAT.S.H '
LOC 270
MOV 15
LDA 1,24872
LDC I,45
CHK J,0,285
IXA 15
LCA 'FLOAT.S.S '
MOV 15
LDA 1,24872
LDC I,46
CHK J,0,285
LOC 280
IXA 15
LCA 'FLOAT.S.D '
MOV 15
LDA 1,24872
LDC I,47
CHK J,0,285
IXA 15
LCA 'FADD.S '
MOV 15
LDA 1,24872
LOC 290
LDC I,48
CHK J,0,285
IXA 15
LCA 'FADD.D '
MOV 15
LDA 1,24872
LDC I,49
CHK J,0,285
IXA 15
LCA 'FSUB.S '
LOC 300
MOV 15
LDA 1,24872
LDC I,50
CHK J,0,285
IXA 15
LCA 'FSUBV.S '
MOV 15
LDA 1,24872
LDC I,51
CHK J,0,285
LOC 310
IXA 15
LCA 'FSUB.D '
MOV 15
LDA 1,24872
LDC I,52
CHK J,0,285
IXA 15
LCA 'FSUBV.D '
MOV 15
LDA 1,24872
LOC 320
LDC I,53
CHK J,0,285
IXA 15
LCA 'FMULT.S '
MOV 15
LDA 1,24872
LDC I,54
CHK J,0,285
IXA 15
LCA 'FMULT.D '
LOC 330
MOV 15
LDA 1,24872
LDC I,55
CHK J,0,285
IXA 15
LCA 'FDIV.S '
MOV 15
LDA 1,24872
LDC I,56
CHK J,0,285
LOC 340
IXA 15
LCA 'FDIVV.S '
MOV 15
LDA 1,24872
LDC I,57
CHK J,0,285
IXA 15
LCA 'FDIV.D '
MOV 15
LDA 1,24872
LOC 350
LDC I,58
CHK J,0,285
IXA 15
LCA 'FDIVV.D '
MOV 15
LDA 1,24872
LDC I,59
CHK J,0,285
IXA 15
LCA 'FTRANS.S.D '
LOC 360
MOV 15
LDA 1,24872
LDC I,60
CHK J,0,285
IXA 15
LCA 'FTRANS.D.S '
MOV 15
LDA 1,24872
LDC I,61
CHK J,0,285
LOC 370
IXA 15
LCA 'HALT '
MOV 15
LDA 1,24872
LDC I,62
CHK J,0,285
IXA 15
LCA 'INC.S '
MOV 15
LDA 1,24872
LOC 380
LDC I,63
CHK J,0,285
IXA 15
LCA 'JMPA '
MOV 15
LDA 1,24872
LDC I,64
CHK J,0,285
IXA 15
LCA 'JMPZ.EQL.Q '
LOC 390
MOV 15
LDA 1,24872
LDC I,65
CHK J,0,285
IXA 15
LCA 'JSR '
MOV 15
LDA 1,24872
LDC I,66
CHK J,0,285
LOC 400
IXA 15
LCA 'MOVADR '
MOV 15
LDA 1,24872
LDC I,67
CHK J,0,285
IXA 15
LCA 'MOV.Q.Q '
MOV 15
LDA 1,24872
LOC 410
LDC I,68
CHK J,0,285
IXA 15
LCA 'MOV.Q.H '
MOV 15
LDA 1,24872
LDC I,69
CHK J,0,285
IXA 15
LCA 'MOV.H.Q '
LOC 420
MOV 15
LDA 1,24872
LDC I,70
CHK J,0,285
IXA 15
LCA 'MOV.H.H '
MOV 15
LDA 1,24872
LDC I,71
CHK J,0,285
LOC 430
IXA 15
LCA 'MOV.Q.S '
MOV 15
LDA 1,24872
LDC I,72
CHK J,0,285
IXA 15
LCA 'MOV.H.S '
MOV 15
LDA 1,24872
LOC 440
LDC I,73
CHK J,0,285
IXA 15
LCA 'MOV.S.Q '
MOV 15
LDA 1,24872
LDC I,74
CHK J,0,285
IXA 15
LCA 'MOV.S.H '
LOC 450
MOV 15
LDA 1,24872
LDC I,75
CHK J,0,285
IXA 15
LCA 'MOV.S.S '
MOV 15
LDA 1,24872
LDC I,76
CHK J,0,285
LOC 460
IXA 15
LCA 'MOV.Q.D '
MOV 15
LDA 1,24872
LDC I,77
CHK J,0,285
IXA 15
LCA 'MOV.H.D '
MOV 15
LDA 1,24872
LOC 470
LDC I,78
CHK J,0,285
IXA 15
LCA 'MOV.S.D '
MOV 15
LDA 1,24872
LDC I,79
CHK J,0,285
IXA 15
LCA 'MOV.D.Q '
LOC 480
MOV 15
LDA 1,24872
LDC I,80
CHK J,0,285
IXA 15
LCA 'MOV.D.H '
MOV 15
LDA 1,24872
LDC I,81
CHK J,0,285
LOC 490
IXA 15
LCA 'MOV.D.S '
MOV 15
LDA 1,24872
LDC I,82
CHK J,0,285
IXA 15
LCA 'MOV.D.D '
MOV 15
LDA 1,24872
LOC 500
LDC I,83
CHK J,0,285
IXA 15
LCA 'MOVMQ.2 '
MOV 15
LDA 1,24872
LDC I,84
CHK J,0,285
IXA 15
LCA 'MOVMQ.3 '
LOC 510
MOV 15
LDA 1,24872
LDC I,85
CHK J,0,285
IXA 15
LCA 'MOVMQ.4 '
MOV 15
LDA 1,24872
LDC I,86
CHK J,0,285
LOC 520
IXA 15
LCA 'MOVMQ.5 '
MOV 15
LDA 1,24872
LDC I,87
CHK J,0,285
IXA 15
LCA 'MOVMQ.6 '
MOV 15
LDA 1,24872
LOC 530
LDC I,88
CHK J,0,285
IXA 15
LCA 'MOVMQ.7 '
MOV 15
LDA 1,24872
LDC I,89
CHK J,0,285
IXA 15
LCA 'MOVMQ.8 '
LOC 540
MOV 15
LDA 1,24872
LDC I,90
CHK J,0,285
IXA 15
LCA 'MOVMQ.9 '
MOV 15
LDA 1,24872
LDC I,91
CHK J,0,285
LOC 550
IXA 15
LCA 'MOVMQ.10 '
MOV 15
LDA 1,24872
LDC I,92
CHK J,0,285
IXA 15
LCA 'MOVMQ.11 '
MOV 15
LDA 1,24872
LOC 560
LDC I,93
CHK J,0,285
IXA 15
LCA 'MOVMQ.12 '
MOV 15
LDA 1,24872
LDC I,94
CHK J,0,285
IXA 15
LCA 'MOVMQ.13 '
LOC 570
MOV 15
LDA 1,24872
LDC I,95
CHK J,0,285
IXA 15
LCA 'MOVMQ.14 '
MOV 15
LDA 1,24872
LDC I,96
CHK J,0,285
LOC 580
IXA 15
LCA 'MOVMQ.15 '
MOV 15
LDA 1,24872
LDC I,97
CHK J,0,285
IXA 15
LCA 'MOVMQ.16 '
MOV 15
LDA 1,24872
LOC 590
LDC I,98
CHK J,0,285
IXA 15
LCA 'MOVMQ.17 '
MOV 15
LDA 1,24872
LDC I,99
CHK J,0,285
IXA 15
LCA 'MOVMQ.18 '
LOC 600
MOV 15
LDA 1,24872
LDC I,100
CHK J,0,285
IXA 15
LCA 'MOVMQ.19 '
MOV 15
LDA 1,24872
LDC I,101
CHK J,0,285
LOC 610
IXA 15
LCA 'MOVMQ.20 '
MOV 15
LDA 1,24872
LDC I,102
CHK J,0,285
IXA 15
LCA 'MOVMQ.21 '
MOV 15
LDA 1,24872
LOC 620
LDC I,103
CHK J,0,285
IXA 15
LCA 'MOVMQ.22 '
MOV 15
LDA 1,24872
LDC I,104
CHK J,0,285
IXA 15
LCA 'MOVMQ.23 '
LOC 630
MOV 15
LDA 1,24872
LDC I,105
CHK J,0,285
IXA 15
LCA 'MOVMQ.24 '
MOV 15
LDA 1,24872
LDC I,106
CHK J,0,285
LOC 640
IXA 15
LCA 'MOVMQ.25 '
MOV 15
LDA 1,24872
LDC I,107
CHK J,0,285
IXA 15
LCA 'MOVMQ.26 '
MOV 15
LDA 1,24872
LOC 650
LDC I,108
CHK J,0,285
IXA 15
LCA 'MOVMQ.27 '
MOV 15
LDA 1,24872
LDC I,109
CHK J,0,285
IXA 15
LCA 'MOVMQ.28 '
LOC 660
MOV 15
LDA 1,24872
LDC I,110
CHK J,0,285
IXA 15
LCA 'MOVMQ.29 '
MOV 15
LDA 1,24872
LDC I,111
CHK J,0,285
LOC 670
IXA 15
LCA 'MOVMQ.30 '
MOV 15
LDA 1,24872
LDC I,112
CHK J,0,285
IXA 15
LCA 'MOVMQ.31 '
MOV 15
LDA 1,24872
LOC 680
LDC I,113
CHK J,0,285
IXA 15
LCA 'MOVMQ.32 '
MOV 15
LDA 1,24872
LDC I,114
CHK J,0,285
IXA 15
LCA 'MOVMQ.64 '
LOC 690
MOV 15
LDA 1,24872
LDC I,115
CHK J,0,285
IXA 15
LCA 'MOVMQ.128 '
MOV 15
LDA 1,24872
LDC I,116
CHK J,0,285
LOC 700
IXA 15
LCA 'MOVMS.2 '
MOV 15
LDA 1,24872
LDC I,117
CHK J,0,285
IXA 15
LCA 'MOVMS.3 '
MOV 15
LDA 1,24872
LOC 710
LDC I,118
CHK J,0,285
IXA 15
LCA 'MOVMS.4 '
MOV 15
LDA 1,24872
LDC I,119
CHK J,0,285
IXA 15
LCA 'MOVMS.5 '
LOC 720
MOV 15
LDA 1,24872
LDC I,120
CHK J,0,285
IXA 15
LCA 'MOVMS.6 '
MOV 15
LDA 1,24872
LDC I,121
CHK J,0,285
LOC 730
IXA 15
LCA 'MOVMS.7 '
MOV 15
LDA 1,24872
LDC I,122
CHK J,0,285
IXA 15
LCA 'MOVMS.8 '
MOV 15
LDA 1,24872
LOC 740
LDC I,123
CHK J,0,285
IXA 15
LCA 'MOVMS.9 '
MOV 15
LDA 1,24872
LDC I,124
CHK J,0,285
IXA 15
LCA 'MOVMS.10 '
LOC 750
MOV 15
LDA 1,24872
LDC I,125
CHK J,0,285
IXA 15
LCA 'MOVMS.11 '
MOV 15
LDA 1,24872
LDC I,126
CHK J,0,285
LOC 760
IXA 15
LCA 'MOVMS.12 '
MOV 15
LDA 1,24872
LDC I,127
CHK J,0,285
IXA 15
LCA 'MOVMS.13 '
MOV 15
LDA 1,24872
LOC 770
LDC I,128
CHK J,0,285
IXA 15
LCA 'MOVMS.14 '
MOV 15
LDA 1,24872
LDC I,129
CHK J,0,285
IXA 15
LCA 'MOVMS.15 '
LOC 780
MOV 15
LDA 1,24872
LDC I,130
CHK J,0,285
IXA 15
LCA 'MOVMS.16 '
MOV 15
LDA 1,24872
LDC I,131
CHK J,0,285
LOC 790
IXA 15
LCA 'MOVMS.17 '
MOV 15
LDA 1,24872
LDC I,132
CHK J,0,285
IXA 15
LCA 'MOVMS.18 '
MOV 15
LDA 1,24872
LOC 800
LDC I,133
CHK J,0,285
IXA 15
LCA 'MOVMS.19 '
MOV 15
LDA 1,24872
LDC I,134
CHK J,0,285
IXA 15
LCA 'MOVMS.20 '
LOC 810
MOV 15
LDA 1,24872
LDC I,135
CHK J,0,285
IXA 15
LCA 'MOVMS.21 '
MOV 15
LDA 1,24872
LDC I,136
CHK J,0,285
LOC 820
IXA 15
LCA 'MOVMS.22 '
MOV 15
LDA 1,24872
LDC I,137
CHK J,0,285
IXA 15
LCA 'MOVMS.23 '
MOV 15
LDA 1,24872
LOC 830
LDC I,138
CHK J,0,285
IXA 15
LCA 'MOVMS.24 '
MOV 15
LDA 1,24872
LDC I,139
CHK J,0,285
IXA 15
LCA 'MOVMS.25 '
LOC 840
MOV 15
LDA 1,24872
LDC I,140
CHK J,0,285
IXA 15
LCA 'MOVMS.26 '
MOV 15
LDA 1,24872
LDC I,141
CHK J,0,285
LOC 850
IXA 15
LCA 'MOVMS.27 '
MOV 15
LDA 1,24872
LDC I,142
CHK J,0,285
IXA 15
LCA 'MOVMS.28 '
MOV 15
LDA 1,24872
LOC 860
LDC I,143
CHK J,0,285
IXA 15
LCA 'MOVMS.29 '
MOV 15
LDA 1,24872
LDC I,144
CHK J,0,285
IXA 15
LCA 'MOVMS.30 '
LOC 870
MOV 15
LDA 1,24872
LDC I,145
CHK J,0,285
IXA 15
LCA 'MOVMS.31 '
MOV 15
LDA 1,24872
LDC I,146
CHK J,0,285
LOC 880
IXA 15
LCA 'MOVMS.32 '
MOV 15
LDA 1,24872
LDC I,147
CHK J,0,285
IXA 15
LCA 'MULT.S '
MOV 15
LDA 1,24872
LOC 890
LDC I,148
CHK J,0,285
IXA 15
LCA 'MULT.D '
MOV 15
LDA 1,24872
LDC I,149
CHK J,0,285
IXA 15
LCA 'NEG.Q '
LOC 900
MOV 15
LDA 1,24872
LDC I,150
CHK J,0,285
IXA 15
LCA 'NEG.H '
MOV 15
LDA 1,24872
LDC I,151
CHK J,0,285
LOC 910
IXA 15
LCA 'NEG.S '
MOV 15
LDA 1,24872
LDC I,152
CHK J,0,285
IXA 15
LCA 'NEG.D '
MOV 15
LDA 1,24872
LOC 920
LDC I,153
CHK J,0,285
IXA 15
LCA 'NOP '
MOV 15
LDA 1,24872
LDC I,154
CHK J,0,285
IXA 15
LCA 'OR.Q '
LOC 930
MOV 15
LDA 1,24872
LDC I,155
CHK J,0,285
IXA 15
LCA 'OR.D '
MOV 15
LDA 1,24872
LDC I,156
CHK J,0,285
LOC 940
IXA 15
LCA 'QUO.S '
MOV 15
LDA 1,24872
LDC I,157
CHK J,0,285
IXA 15
LCA 'QUOV.S '
MOV 15
LDA 1,24872
LOC 950
LDC I,158
CHK J,0,285
IXA 15
LCA 'QUO.D '
MOV 15
LDA 1,24872
LDC I,159
CHK J,0,285
IXA 15
LCA 'QUOV.D '
LOC 960
MOV 15
LDA 1,24872
LDC I,160
CHK J,0,285
IXA 15
LCA 'REM.S '
MOV 15
LDA 1,24872
LDC I,161
CHK J,0,285
LOC 970
IXA 15
LCA 'REMV.S '
MOV 15
LDA 1,24872
LDC I,162
CHK J,0,285
IXA 15
LCA 'REM.D '
MOV 15
LDA 1,24872
LOC 980
LDC I,163
CHK J,0,285
IXA 15
LCA 'REMV.D '
MOV 15
LDA 1,24872
LDC I,164
CHK J,0,285
IXA 15
LCA 'RETSR '
LOC 990
MOV 15
LDA 1,24872
LDC I,165
CHK J,0,285
IXA 15
LCA 'SHF.LF.D '
MOV 15
LDA 1,24872
LDC I,166
CHK J,0,285
LOC 1000
IXA 15
LCA 'SHFV.LF.D '
MOV 15
LDA 1,24872
LDC I,167
CHK J,0,285
IXA 15
LCA 'SHFA.LF.S '
MOV 15
LDA 1,24872
LOC 1010
LDC I,168
CHK J,0,285
IXA 15
LCA 'SHFAV.LF.S '
MOV 15
LDA 1,24872
LDC I,169
CHK J,0,285
IXA 15
LCA 'SKP.EQL.Q '
LOC 1020
MOV 15
LDA 1,24872
LDC I,170
CHK J,0,285
IXA 15
LCA 'SKP.NEQ.Q '
MOV 15
LDA 1,24872
LDC I,171
CHK J,0,285
LOC 1030
IXA 15
LCA 'SKP.GEQ.Q '
MOV 15
LDA 1,24872
LDC I,172
CHK J,0,285
IXA 15
LCA 'SKP.GTR.Q '
MOV 15
LDA 1,24872
LOC 1040
LDC I,173
CHK J,0,285
IXA 15
LCA 'SKP.LEQ.Q '
MOV 15
LDA 1,24872
LDC I,174
CHK J,0,285
IXA 15
LCA 'SKP.LSS.Q '
LOC 1050
MOV 15
LDA 1,24872
LDC I,175
CHK J,0,285
IXA 15
LCA 'SKP.EQL.H '
MOV 15
LDA 1,24872
LDC I,176
CHK J,0,285
LOC 1060
IXA 15
LCA 'SKP.NEQ.H '
MOV 15
LDA 1,24872
LDC I,177
CHK J,0,285
IXA 15
LCA 'SKP.GEQ.H '
MOV 15
LDA 1,24872
LOC 1070
LDC I,178
CHK J,0,285
IXA 15
LCA 'SKP.GTR.H '
MOV 15
LDA 1,24872
LDC I,179
CHK J,0,285
IXA 15
LCA 'SKP.LEQ.H '
LOC 1080
MOV 15
LDA 1,24872
LDC I,180
CHK J,0,285
IXA 15
LCA 'SKP.LSS.H '
MOV 15
LDA 1,24872
LDC I,181
CHK J,0,285
LOC 1090
IXA 15
LCA 'SKP.EQL.S '
MOV 15
LDA 1,24872
LDC I,182
CHK J,0,285
IXA 15
LCA 'SKP.NEQ.S '
MOV 15
LDA 1,24872
LOC 1100
LDC I,183
CHK J,0,285
IXA 15
LCA 'SKP.GEQ.S '
MOV 15
LDA 1,24872
LDC I,184
CHK J,0,285
IXA 15
LCA 'SKP.GTR.S '
LOC 1110
MOV 15
LDA 1,24872
LDC I,185
CHK J,0,285
IXA 15
LCA 'SKP.LEQ.S '
MOV 15
LDA 1,24872
LDC I,186
CHK J,0,285
LOC 1120
IXA 15
LCA 'SKP.LSS.S '
MOV 15
LDA 1,24872
LDC I,187
CHK J,0,285
IXA 15
LCA 'SKP.EQL.D '
MOV 15
LDA 1,24872
LOC 1130
LDC I,188
CHK J,0,285
IXA 15
LCA 'SKP.NEQ.D '
MOV 15
LDA 1,24872
LDC I,189
CHK J,0,285
IXA 15
LCA 'SKP.GEQ.D '
LOC 1140
MOV 15
LDA 1,24872
LDC I,190
CHK J,0,285
IXA 15
LCA 'SKP.GTR.D '
MOV 15
LDA 1,24872
LDC I,191
CHK J,0,285
LOC 1150
IXA 15
LCA 'SKP.LEQ.D '
MOV 15
LDA 1,24872
LDC I,192
CHK J,0,285
IXA 15
LCA 'SKP.LSS.D '
MOV 15
LDA 1,24872
LOC 1160
LDC I,193
CHK J,0,285
IXA 15
LCA 'SKP.NON.Q '
MOV 15
LDA 1,24872
LDC I,194
CHK J,0,285
IXA 15
LCA 'SKP.NON.H '
LOC 1170
MOV 15
LDA 1,24872
LDC I,195
CHK J,0,285
IXA 15
LCA 'SKP.NON.S '
MOV 15
LDA 1,24872
LDC I,196
CHK J,0,285
LOC 1180
IXA 15
LCA 'SKP.NON.D '
MOV 15
LDA 1,24872
LDC I,197
CHK J,0,285
IXA 15
LCA 'SKP.ANY.Q '
MOV 15
LDA 1,24872
LOC 1190
LDC I,198
CHK J,0,285
IXA 15
LCA 'SKP.ANY.H '
MOV 15
LDA 1,24872
LDC I,199
CHK J,0,285
IXA 15
LCA 'SKP.ANY.S '
LOC 1200
MOV 15
LDA 1,24872
LDC I,200
CHK J,0,285
IXA 15
LCA 'SKP.ANY.D '
MOV 15
LDA 1,24872
LDC I,201
CHK J,0,285
LOC 1210
IXA 15
LCA 'SLR.0 '
MOV 15
LDA 1,24872
LDC I,202
CHK J,0,285
IXA 15
LCA 'SLR.1 '
MOV 15
LDA 1,24872
LOC 1220
LDC I,203
CHK J,0,285
IXA 15
LCA 'SLR.2 '
MOV 15
LDA 1,24872
LDC I,204
CHK J,0,285
IXA 15
LCA 'SLR.3 '
LOC 1230
MOV 15
LDA 1,24872
LDC I,205
CHK J,0,285
IXA 15
LCA 'SLR.4 '
MOV 15
LDA 1,24872
LDC I,206
CHK J,0,285
LOC 1240
IXA 15
LCA 'SLR.5 '
MOV 15
LDA 1,24872
LDC I,207
CHK J,0,285
IXA 15
LCA 'SLR.6 '
MOV 15
LDA 1,24872
LOC 1250
LDC I,208
CHK J,0,285
IXA 15
LCA 'SLR.7 '
MOV 15
LDA 1,24872
LDC I,209
CHK J,0,285
IXA 15
LCA 'SLR.8 '
LOC 1260
MOV 15
LDA 1,24872
LDC I,210
CHK J,0,285
IXA 15
LCA 'SLR.9 '
MOV 15
LDA 1,24872
LDC I,211
CHK J,0,285
LOC 1270
IXA 15
LCA 'SLR.10 '
MOV 15
LDA 1,24872
LDC I,212
CHK J,0,285
IXA 15
LCA 'SLR.11 '
MOV 15
LDA 1,24872
LOC 1280
LDC I,213
CHK J,0,285
IXA 15
LCA 'SLR.12 '
MOV 15
LDA 1,24872
LDC I,214
CHK J,0,285
IXA 15
LCA 'SLR.13 '
LOC 1290
MOV 15
LDA 1,24872
LDC I,215
CHK J,0,285
IXA 15
LCA 'SLR.14 '
MOV 15
LDA 1,24872
LDC I,216
CHK J,0,285
LOC 1300
IXA 15
LCA 'SLR.15 '
MOV 15
LDA 1,24872
LDC I,217
CHK J,0,285
IXA 15
LCA 'SLR.16 '
MOV 15
LDA 1,24872
LOC 1310
LDC I,218
CHK J,0,285
IXA 15
LCA 'SLR.17 '
MOV 15
LDA 1,24872
LDC I,219
CHK J,0,285
IXA 15
LCA 'SLR.18 '
LOC 1320
MOV 15
LDA 1,24872
LDC I,220
CHK J,0,285
IXA 15
LCA 'SLR.19 '
MOV 15
LDA 1,24872
LDC I,221
CHK J,0,285
LOC 1330
IXA 15
LCA 'SLR.20 '
MOV 15
LDA 1,24872
LDC I,222
CHK J,0,285
IXA 15
LCA 'SLR.21 '
MOV 15
LDA 1,24872
LOC 1340
LDC I,223
CHK J,0,285
IXA 15
LCA 'SLR.22 '
MOV 15
LDA 1,24872
LDC I,224
CHK J,0,285
IXA 15
LCA 'SLR.23 '
LOC 1350
MOV 15
LDA 1,24872
LDC I,225
CHK J,0,285
IXA 15
LCA 'SLR.24 '
MOV 15
LDA 1,24872
LDC I,226
CHK J,0,285
LOC 1360
IXA 15
LCA 'SLR.25 '
MOV 15
LDA 1,24872
LDC I,227
CHK J,0,285
IXA 15
LCA 'SLR.26 '
MOV 15
LDA 1,24872
LOC 1370
LDC I,228
CHK J,0,285
IXA 15
LCA 'SLR.27 '
MOV 15
LDA 1,24872
LDC I,229
CHK J,0,285
IXA 15
LCA 'SLR.28 '
LOC 1380
MOV 15
LDA 1,24872
LDC I,230
CHK J,0,285
IXA 15
LCA 'SLR.29 '
MOV 15
LDA 1,24872
LDC I,231
CHK J,0,285
LOC 1390
IXA 15
LCA 'SLR.30 '
MOV 15
LDA 1,24872
LDC I,232
CHK J,0,285
IXA 15
LCA 'SLR.31 '
MOV 15
LDA 1,24872
LOC 1400
LDC I,233
CHK J,0,285
IXA 15
LCA 'SLRADR.0 '
MOV 15
LDA 1,24872
LDC I,234
CHK J,0,285
IXA 15
LCA 'SLRADR.1 '
LOC 1410
MOV 15
LDA 1,24872
LDC I,235
CHK J,0,285
IXA 15
LCA 'SLRADR.2 '
MOV 15
LDA 1,24872
LDC I,236
CHK J,0,285
LOC 1420
IXA 15
LCA 'SLRADR.3 '
MOV 15
LDA 1,24872
LDC I,237
CHK J,0,285
IXA 15
LCA 'SLRADR.4 '
MOV 15
LDA 1,24872
LOC 1430
LDC I,238
CHK J,0,285
IXA 15
LCA 'SLRADR.5 '
MOV 15
LDA 1,24872
LDC I,239
CHK J,0,285
IXA 15
LCA 'SLRADR.6 '
LOC 1440
MOV 15
LDA 1,24872
LDC I,240
CHK J,0,285
IXA 15
LCA 'SLRADR.7 '
MOV 15
LDA 1,24872
LDC I,241
CHK J,0,285
LOC 1450
IXA 15
LCA 'SLRADR.8 '
MOV 15
LDA 1,24872
LDC I,242
CHK J,0,285
IXA 15
LCA 'SLRADR.9 '
MOV 15
LDA 1,24872
LOC 1460
LDC I,243
CHK J,0,285
IXA 15
LCA 'SLRADR.10 '
MOV 15
LDA 1,24872
LDC I,244
CHK J,0,285
IXA 15
LCA 'SLRADR.11 '
LOC 1470
MOV 15
LDA 1,24872
LDC I,245
CHK J,0,285
IXA 15
LCA 'SLRADR.12 '
MOV 15
LDA 1,24872
LDC I,246
CHK J,0,285
LOC 1480
IXA 15
LCA 'SLRADR.13 '
MOV 15
LDA 1,24872
LDC I,247
CHK J,0,285
IXA 15
LCA 'SLRADR.14 '
MOV 15
LDA 1,24872
LOC 1490
LDC I,248
CHK J,0,285
IXA 15
LCA 'SLRADR.15 '
MOV 15
LDA 1,24872
LDC I,249
CHK J,0,285
IXA 15
LCA 'SLRADR.16 '
LOC 1500
MOV 15
LDA 1,24872
LDC I,250
CHK J,0,285
IXA 15
LCA 'SLRADR.17 '
MOV 15
LDA 1,24872
LDC I,251
CHK J,0,285
LOC 1510
IXA 15
LCA 'SLRADR.18 '
MOV 15
LDA 1,24872
LDC I,252
CHK J,0,285
IXA 15
LCA 'SLRADR.19 '
MOV 15
LDA 1,24872
LOC 1520
LDC I,253
CHK J,0,285
IXA 15
LCA 'SLRADR.20 '
MOV 15
LDA 1,24872
LDC I,254
CHK J,0,285
IXA 15
LCA 'SLRADR.21 '
LOC 1530
MOV 15
LDA 1,24872
LDC I,255
CHK J,0,285
IXA 15
LCA 'SLRADR.22 '
MOV 15
LDA 1,24872
LDC I,256
CHK J,0,285
LOC 1540
IXA 15
LCA 'SLRADR.23 '
MOV 15
LDA 1,24872
LDC I,257
CHK J,0,285
IXA 15
LCA 'SLRADR.24 '
MOV 15
LDA 1,24872
LOC 1550
LDC I,258
CHK J,0,285
IXA 15
LCA 'SLRADR.25 '
MOV 15
LDA 1,24872
LDC I,259
CHK J,0,285
IXA 15
LCA 'SLRADR.26 '
LOC 1560
MOV 15
LDA 1,24872
LDC I,260
CHK J,0,285
IXA 15
LCA 'SLRADR.27 '
MOV 15
LDA 1,24872
LDC I,261
CHK J,0,285
LOC 1570
IXA 15
LCA 'SLRADR.28 '
MOV 15
LDA 1,24872
LDC I,262
CHK J,0,285
IXA 15
LCA 'SLRADR.29 '
MOV 15
LDA 1,24872
LOC 1580
LDC I,263
CHK J,0,285
IXA 15
LCA 'SLRADR.30 '
MOV 15
LDA 1,24872
LDC I,264
CHK J,0,285
IXA 15
LCA 'SLRADR.31 '
LOC 1590
MOV 15
LDA 1,24872
LDC I,265
CHK J,0,285
IXA 15
LCA 'SUB.S '
MOV 15
LDA 1,24872
LDC I,266
CHK J,0,285
LOC 1600
IXA 15
LCA 'SUBV.S '
MOV 15
LDA 1,24872
LDC I,267
CHK J,0,285
IXA 15
LCA 'SUB.D '
MOV 15
LDA 1,24872
LOC 1610
LDC I,268
CHK J,0,285
IXA 15
LCA 'SUBV.D '
MOV 15
LDA 1,24872
LDC I,269
CHK J,0,285
IXA 15
LCA 'TRANS.Q.Q '
LOC 1620
MOV 15
LDA 1,24872
LDC I,270
CHK J,0,285
IXA 15
LCA 'TRANS.Q.H '
MOV 15
LDA 1,24872
LDC I,271
CHK J,0,285
LOC 1630
IXA 15
LCA 'TRANS.H.Q '
MOV 15
LDA 1,24872
LDC I,272
CHK J,0,285
IXA 15
LCA 'TRANS.H.H '
MOV 15
LDA 1,24872
LOC 1640
LDC I,273
CHK J,0,285
IXA 15
LCA 'TRANS.Q.S '
MOV 15
LDA 1,24872
LDC I,274
CHK J,0,285
IXA 15
LCA 'TRANS.H.S '
LOC 1650
MOV 15
LDA 1,24872
LDC I,275
CHK J,0,285
IXA 15
LCA 'TRANS.S.Q '
MOV 15
LDA 1,24872
LDC I,276
CHK J,0,285
LOC 1660
IXA 15
LCA 'TRANS.S.H '
MOV 15
LDA 1,24872
LDC I,277
CHK J,0,285
IXA 15
LCA 'TRANS.S.S '
MOV 15
LDA 1,24872
LOC 1670
LDC I,278
CHK J,0,285
IXA 15
LCA 'TRANS.Q.D '
MOV 15
LDA 1,24872
LDC I,279
CHK J,0,285
IXA 15
LCA 'TRANS.H.D '
LOC 1680
MOV 15
LDA 1,24872
LDC I,280
CHK J,0,285
IXA 15
LCA 'TRANS.S.D '
MOV 15
LDA 1,24872
LDC I,281
CHK J,0,285
LOC 1690
IXA 15
LCA 'TRANS.D.Q '
MOV 15
LDA 1,24872
LDC I,282
CHK J,0,285
IXA 15
LCA 'TRANS.D.H '
MOV 15
LDA 1,24872
LOC 1700
LDC I,283
CHK J,0,285
IXA 15
LCA 'TRANS.D.S '
MOV 15
LDA 1,24872
LDC I,284
CHK J,0,285
IXA 15
LCA 'TRANS.D.D '
LOC 1710
MOV 15
LDA 1,24872
LDC I,285
CHK J,0,285
IXA 15
LCA 'XOR.Q '
MOV 15
RET P
L1 DEF 8
SST P INIT5233 3 0 0 0 0
LOC 0
INIT5233 ENT P,3,L1 INIT5 1 1 1
LDA 1,5056
LDC I,0
CHK J,0,285
IXA 4
LDC I,4095
CHK I,0,4095
STO I
LDA 1,5056
LDC I,1
LOC 10
CHK J,0,285
IXA 4
LDC I,4094
CHK I,0,4095
STO I
LDA 1,5056
LDC I,2
CHK J,0,285
IXA 4
LDC I,4093
LOC 20
CHK I,0,4095
STO I
LDA 1,5056
LDC I,3
CHK J,0,285
IXA 4
LDC I,4092
CHK I,0,4095
STO I
LDA 1,5056
LOC 30
LDC I,4
CHK J,0,285
IXA 4
LDC I,1487
CHK I,0,4095
STO I
LDA 1,5056
LDC I,5
CHK J,0,285
IXA 4
LOC 40
LDC I,1488
CHK I,0,4095
STO I
LDA 1,5056
LDC I,6
CHK J,0,285
IXA 4
LDC I,1489
CHK I,0,4095
STO I
LOC 50
LDA 1,5056
LDC I,7
CHK J,0,285
IXA 4
LDC I,1490
CHK I,0,4095
STO I
LDA 1,5056
LDC I,8
CHK J,0,285
LOC 60
IXA 4
LDC I,12
CHK I,0,4095
STO I
LDA 1,5056
LDC I,9
CHK J,0,285
IXA 4
LDC I,16
CHK I,0,4095
LOC 70
STO I
LDA 1,5056
LDC I,10
CHK J,0,285
IXA 4
LDC I,1830
CHK I,0,4095
STO I
LDA 1,5056
LDC I,11
LOC 80
CHK J,0,285
IXA 4
LDC I,1831
CHK I,0,4095
STO I
LDA 1,5056
LDC I,12
CHK J,0,285
IXA 4
LDC I,1666
LOC 90
CHK I,0,4095
STO I
LDA 1,5056
LDC I,13
CHK J,0,285
IXA 4
LDC I,736
CHK I,0,4095
STO I
LDA 1,5056
LOC 100
LDC I,14
CHK J,0,285
IXA 4
LDC I,748
CHK I,0,4095
STO I
LDA 1,5056
LDC I,15
CHK J,0,285
IXA 4
LOC 110
LDC I,764
CHK I,0,4095
STO I
LDA 1,5056
LDC I,16
CHK J,0,285
IXA 4
LDC I,780
CHK I,0,4095
STO I
LOC 120
LDA 1,5056
LDC I,17
CHK J,0,285
IXA 4
LDC I,1866
CHK I,0,4095
STO I
LDA 1,5056
LDC I,18
CHK J,0,285
LOC 130
IXA 4
LDC I,1878
CHK I,0,4095
STO I
LDA 1,5056
LDC I,19
CHK J,0,285
IXA 4
LDC I,1870
CHK I,0,4095
LOC 140
STO I
LDA 1,5056
LDC I,20
CHK J,0,285
IXA 4
LDC I,1862
CHK I,0,4095
STO I
LDA 1,5056
LDC I,21
LOC 150
CHK J,0,285
IXA 4
LDC I,1882
CHK I,0,4095
STO I
LDA 1,5056
LDC I,22
CHK J,0,285
IXA 4
LDC I,1874
LOC 160
CHK I,0,4095
STO I
LDA 1,5056
LDC I,23
CHK J,0,285
IXA 4
LDC I,1886
CHK I,0,4095
STO I
LDA 1,5056
LOC 170
LDC I,24
CHK J,0,285
IXA 4
LDC I,1645
CHK I,0,4095
STO I
LDA 1,5056
LDC I,25
CHK J,0,285
IXA 4
LOC 180
LDC I,1646
CHK I,0,4095
STO I
LDA 1,5056
LDC I,26
CHK J,0,285
IXA 4
LDC I,1647
CHK I,0,4095
STO I
LOC 190
LDA 1,5056
LDC I,27
CHK J,0,285
IXA 4
LDC I,1648
CHK I,0,4095
STO I
LDA 1,5056
LDC I,28
CHK J,0,285
LOC 200
IXA 4
LDC I,1653
CHK I,0,4095
STO I
LDA 1,5056
LDC I,29
CHK J,0,285
IXA 4
LDC I,1654
CHK I,0,4095
LOC 210
STO I
LDA 1,5056
LDC I,30
CHK J,0,285
IXA 4
LDC I,1655
CHK I,0,4095
STO I
LDA 1,5056
LDC I,31
LOC 220
CHK J,0,285
IXA 4
LDC I,1656
CHK I,0,4095
STO I
LDA 1,5056
LDC I,32
CHK J,0,285
IXA 4
LDC I,1657
LOC 230
CHK I,0,4095
STO I
LDA 1,5056
LDC I,33
CHK J,0,285
IXA 4
LDC I,1658
CHK I,0,4095
STO I
LDA 1,5056
LOC 240
LDC I,34
CHK J,0,285
IXA 4
LDC I,1659
CHK I,0,4095
STO I
LDA 1,5056
LDC I,35
CHK J,0,285
IXA 4
LOC 250
LDC I,1660
CHK I,0,4095
STO I
LDA 1,5056
LDC I,36
CHK J,0,285
IXA 4
LDC I,1661
CHK I,0,4095
STO I
LOC 260
LDA 1,5056
LDC I,37
CHK J,0,285
IXA 4
LDC I,1662
CHK I,0,4095
STO I
LDA 1,5056
LDC I,38
CHK J,0,285
LOC 270
IXA 4
LDC I,1663
CHK I,0,4095
STO I
LDA 1,5056
LDC I,39
CHK J,0,285
IXA 4
LDC I,1664
CHK I,0,4095
LOC 280
STO I
LDA 1,5056
LDC I,40
CHK J,0,285
IXA 4
LDC I,1384
CHK I,0,4095
STO I
LDA 1,5056
LDC I,41
LOC 290
CHK J,0,285
IXA 4
LDC I,1433
CHK I,0,4095
STO I
LDA 1,5056
LDC I,42
CHK J,0,285
IXA 4
LDC I,1434
LOC 300
CHK I,0,4095
STO I
LDA 1,5056
LDC I,43
CHK J,0,285
IXA 4
LDC I,1466
CHK I,0,4095
STO I
LDA 1,5056
LOC 310
LDC I,44
CHK J,0,285
IXA 4
LDC I,1467
CHK I,0,4095
STO I
LDA 1,5056
LDC I,45
CHK J,0,285
IXA 4
LOC 320
LDC I,1468
CHK I,0,4095
STO I
LDA 1,5056
LDC I,46
CHK J,0,285
IXA 4
LDC I,1469
CHK I,0,4095
STO I
LOC 330
LDA 1,5056
LDC I,47
CHK J,0,285
IXA 4
LDC I,412
CHK I,0,4095
STO I
LDA 1,5056
LDC I,48
CHK J,0,285
LOC 340
IXA 4
LDC I,416
CHK I,0,4095
STO I
LDA 1,5056
LDC I,49
CHK J,0,285
IXA 4
LDC I,424
CHK I,0,4095
LOC 350
STO I
LDA 1,5056
LDC I,50
CHK J,0,285
IXA 4
LDC I,436
CHK I,0,4095
STO I
LDA 1,5056
LDC I,51
LOC 360
CHK J,0,285
IXA 4
LDC I,428
CHK I,0,4095
STO I
LDA 1,5056
LDC I,52
CHK J,0,285
IXA 4
LDC I,440
LOC 370
CHK I,0,4095
STO I
LDA 1,5056
LDC I,53
CHK J,0,285
IXA 4
LDC I,448
CHK I,0,4095
STO I
LDA 1,5056
LOC 380
LDC I,54
CHK J,0,285
IXA 4
LDC I,452
CHK I,0,4095
STO I
LDA 1,5056
LDC I,55
CHK J,0,285
IXA 4
LOC 390
LDC I,468
CHK I,0,4095
STO I
LDA 1,5056
LDC I,56
CHK J,0,285
IXA 4
LDC I,480
CHK I,0,4095
STO I
LOC 400
LDA 1,5056
LDC I,57
CHK J,0,285
IXA 4
LDC I,472
CHK I,0,4095
STO I
LDA 1,5056
LDC I,58
CHK J,0,285
LOC 410
IXA 4
LDC I,484
CHK I,0,4095
STO I
LDA 1,5056
LDC I,59
CHK J,0,285
IXA 4
LDC I,1479
CHK I,0,4095
LOC 420
STO I
LDA 1,5056
LDC I,60
CHK J,0,285
IXA 4
LDC I,1481
CHK I,0,4095
STO I
LDA 1,5056
LDC I,61
LOC 430
CHK J,0,285
IXA 4
LDC I,1376
CHK I,0,4095
STO I
LDA 1,5056
LDC I,62
CHK J,0,285
IXA 4
LDC I,1380
LOC 440
CHK I,0,4095
STO I
LDA 1,5056
LDC I,63
CHK J,0,285
IXA 4
LDC I,1296
CHK I,0,4095
STO I
LDA 1,5056
LOC 450
LDC I,64
CHK J,0,285
IXA 4
LDC I,1256
CHK I,0,4095
STO I
LDA 1,5056
LDC I,65
CHK J,0,285
IXA 4
LOC 460
LDC I,1350
CHK I,0,4095
STO I
LDA 1,5056
LDC I,66
CHK J,0,285
IXA 4
LDC I,1639
CHK I,0,4095
STO I
LOC 470
LDA 1,5056
LDC I,67
CHK J,0,285
IXA 4
LDC I,1491
CHK I,0,4095
STO I
LDA 1,5056
LDC I,68
CHK J,0,285
LOC 480
IXA 4
LDC I,1492
CHK I,0,4095
STO I
LDA 1,5056
LDC I,69
CHK J,0,285
IXA 4
LDC I,1495
CHK I,0,4095
LOC 490
STO I
LDA 1,5056
LDC I,70
CHK J,0,285
IXA 4
LDC I,1496
CHK I,0,4095
STO I
LDA 1,5056
LDC I,71
LOC 500
CHK J,0,285
IXA 4
LDC I,1493
CHK I,0,4095
STO I
LDA 1,5056
LDC I,72
CHK J,0,285
IXA 4
LDC I,1497
LOC 510
CHK I,0,4095
STO I
LDA 1,5056
LDC I,73
CHK J,0,285
IXA 4
LDC I,1499
CHK I,0,4095
STO I
LDA 1,5056
LOC 520
LDC I,74
CHK J,0,285
IXA 4
LDC I,1500
CHK I,0,4095
STO I
LDA 1,5056
LDC I,75
CHK J,0,285
IXA 4
LOC 530
LDC I,1501
CHK I,0,4095
STO I
LDA 1,5056
LDC I,76
CHK J,0,285
IXA 4
LDC I,1494
CHK I,0,4095
STO I
LOC 540
LDA 1,5056
LDC I,77
CHK J,0,285
IXA 4
LDC I,1498
CHK I,0,4095
STO I
LDA 1,5056
LDC I,78
CHK J,0,285
LOC 550
IXA 4
LDC I,1502
CHK I,0,4095
STO I
LDA 1,5056
LDC I,79
CHK J,0,285
IXA 4
LDC I,1503
CHK I,0,4095
LOC 560
STO I
LDA 1,5056
LDC I,80
CHK J,0,285
IXA 4
LDC I,1504
CHK I,0,4095
STO I
LDA 1,5056
LDC I,81
LOC 570
CHK J,0,285
IXA 4
LDC I,1505
CHK I,0,4095
STO I
LDA 1,5056
LDC I,82
CHK J,0,285
IXA 4
LDC I,1506
LOC 580
CHK I,0,4095
STO I
LDA 1,5056
LDC I,83
CHK J,0,285
IXA 4
LDC I,1507
CHK I,0,4095
STO I
LDA 1,5056
LOC 590
LDC I,84
CHK J,0,285
IXA 4
LDC I,1508
CHK I,0,4095
STO I
LDA 1,5056
LDC I,85
CHK J,0,285
IXA 4
LOC 600
LDC I,1509
CHK I,0,4095
STO I
LDA 1,5056
LDC I,86
CHK J,0,285
IXA 4
LDC I,1510
CHK I,0,4095
STO I
LOC 610
LDA 1,5056
LDC I,87
CHK J,0,285
IXA 4
LDC I,1511
CHK I,0,4095
STO I
LDA 1,5056
LDC I,88
CHK J,0,285
LOC 620
IXA 4
LDC I,1512
CHK I,0,4095
STO I
LDA 1,5056
LDC I,89
CHK J,0,285
IXA 4
LDC I,1513
CHK I,0,4095
LOC 630
STO I
LDA 1,5056
LDC I,90
CHK J,0,285
IXA 4
LDC I,1514
CHK I,0,4095
STO I
LDA 1,5056
LDC I,91
LOC 640
CHK J,0,285
IXA 4
LDC I,1515
CHK I,0,4095
STO I
LDA 1,5056
LDC I,92
CHK J,0,285
IXA 4
LDC I,1516
LOC 650
CHK I,0,4095
STO I
LDA 1,5056
LDC I,93
CHK J,0,285
IXA 4
LDC I,1517
CHK I,0,4095
STO I
LDA 1,5056
LOC 660
LDC I,94
CHK J,0,285
IXA 4
LDC I,1518
CHK I,0,4095
STO I
LDA 1,5056
LDC I,95
CHK J,0,285
IXA 4
LOC 670
LDC I,1519
CHK I,0,4095
STO I
LDA 1,5056
LDC I,96
CHK J,0,285
IXA 4
LDC I,1520
CHK I,0,4095
STO I
LOC 680
LDA 1,5056
LDC I,97
CHK J,0,285
IXA 4
LDC I,1521
CHK I,0,4095
STO I
LDA 1,5056
LDC I,98
CHK J,0,285
LOC 690
IXA 4
LDC I,1522
CHK I,0,4095
STO I
LDA 1,5056
LDC I,99
CHK J,0,285
IXA 4
LDC I,1523
CHK I,0,4095
LOC 700
STO I
LDA 1,5056
LDC I,100
CHK J,0,285
IXA 4
LDC I,1524
CHK I,0,4095
STO I
LDA 1,5056
LDC I,101
LOC 710
CHK J,0,285
IXA 4
LDC I,1525
CHK I,0,4095
STO I
LDA 1,5056
LDC I,102
CHK J,0,285
IXA 4
LDC I,1526
LOC 720
CHK I,0,4095
STO I
LDA 1,5056
LDC I,103
CHK J,0,285
IXA 4
LDC I,1527
CHK I,0,4095
STO I
LDA 1,5056
LOC 730
LDC I,104
CHK J,0,285
IXA 4
LDC I,1528
CHK I,0,4095
STO I
LDA 1,5056
LDC I,105
CHK J,0,285
IXA 4
LOC 740
LDC I,1529
CHK I,0,4095
STO I
LDA 1,5056
LDC I,106
CHK J,0,285
IXA 4
LDC I,1530
CHK I,0,4095
STO I
LOC 750
LDA 1,5056
LDC I,107
CHK J,0,285
IXA 4
LDC I,1531
CHK I,0,4095
STO I
LDA 1,5056
LDC I,108
CHK J,0,285
LOC 760
IXA 4
LDC I,1532
CHK I,0,4095
STO I
LDA 1,5056
LDC I,109
CHK J,0,285
IXA 4
LDC I,1533
CHK I,0,4095
LOC 770
STO I
LDA 1,5056
LDC I,110
CHK J,0,285
IXA 4
LDC I,1534
CHK I,0,4095
STO I
LDA 1,5056
LDC I,111
LOC 780
CHK J,0,285
IXA 4
LDC I,1535
CHK I,0,4095
STO I
LDA 1,5056
LDC I,112
CHK J,0,285
IXA 4
LDC I,1536
LOC 790
CHK I,0,4095
STO I
LDA 1,5056
LDC I,113
CHK J,0,285
IXA 4
LDC I,1537
CHK I,0,4095
STO I
LDA 1,5056
LOC 800
LDC I,114
CHK J,0,285
IXA 4
LDC I,1538
CHK I,0,4095
STO I
LDA 1,5056
LDC I,115
CHK J,0,285
IXA 4
LOC 810
LDC I,1539
CHK I,0,4095
STO I
LDA 1,5056
LDC I,116
CHK J,0,285
IXA 4
LDC I,1540
CHK I,0,4095
STO I
LOC 820
LDA 1,5056
LDC I,117
CHK J,0,285
IXA 4
LDC I,1541
CHK I,0,4095
STO I
LDA 1,5056
LDC I,118
CHK J,0,285
LOC 830
IXA 4
LDC I,1542
CHK I,0,4095
STO I
LDA 1,5056
LDC I,119
CHK J,0,285
IXA 4
LDC I,1543
CHK I,0,4095
LOC 840
STO I
LDA 1,5056
LDC I,120
CHK J,0,285
IXA 4
LDC I,1544
CHK I,0,4095
STO I
LDA 1,5056
LDC I,121
LOC 850
CHK J,0,285
IXA 4
LDC I,1545
CHK I,0,4095
STO I
LDA 1,5056
LDC I,122
CHK J,0,285
IXA 4
LDC I,1546
LOC 860
CHK I,0,4095
STO I
LDA 1,5056
LDC I,123
CHK J,0,285
IXA 4
LDC I,1547
CHK I,0,4095
STO I
LDA 1,5056
LOC 870
LDC I,124
CHK J,0,285
IXA 4
LDC I,1548
CHK I,0,4095
STO I
LDA 1,5056
LDC I,125
CHK J,0,285
IXA 4
LOC 880
LDC I,1549
CHK I,0,4095
STO I
LDA 1,5056
LDC I,126
CHK J,0,285
IXA 4
LDC I,1550
CHK I,0,4095
STO I
LOC 890
LDA 1,5056
LDC I,127
CHK J,0,285
IXA 4
LDC I,1551
CHK I,0,4095
STO I
LDA 1,5056
LDC I,128
CHK J,0,285
LOC 900
IXA 4
LDC I,1552
CHK I,0,4095
STO I
LDA 1,5056
LDC I,129
CHK J,0,285
IXA 4
LDC I,1553
CHK I,0,4095
LOC 910
STO I
LDA 1,5056
LDC I,130
CHK J,0,285
IXA 4
LDC I,1554
CHK I,0,4095
STO I
LDA 1,5056
LDC I,131
LOC 920
CHK J,0,285
IXA 4
LDC I,1555
CHK I,0,4095
STO I
LDA 1,5056
LDC I,132
CHK J,0,285
IXA 4
LDC I,1556
LOC 930
CHK I,0,4095
STO I
LDA 1,5056
LDC I,133
CHK J,0,285
IXA 4
LDC I,1557
CHK I,0,4095
STO I
LDA 1,5056
LOC 940
LDC I,134
CHK J,0,285
IXA 4
LDC I,1558
CHK I,0,4095
STO I
LDA 1,5056
LDC I,135
CHK J,0,285
IXA 4
LOC 950
LDC I,1559
CHK I,0,4095
STO I
LDA 1,5056
LDC I,136
CHK J,0,285
IXA 4
LDC I,1560
CHK I,0,4095
STO I
LOC 960
LDA 1,5056
LDC I,137
CHK J,0,285
IXA 4
LDC I,1561
CHK I,0,4095
STO I
LDA 1,5056
LDC I,138
CHK J,0,285
LOC 970
IXA 4
LDC I,1562
CHK I,0,4095
STO I
LDA 1,5056
LDC I,139
CHK J,0,285
IXA 4
LDC I,1563
CHK I,0,4095
LOC 980
STO I
LDA 1,5056
LDC I,140
CHK J,0,285
IXA 4
LDC I,1564
CHK I,0,4095
STO I
LDA 1,5056
LDC I,141
LOC 990
CHK J,0,285
IXA 4
LDC I,1565
CHK I,0,4095
STO I
LDA 1,5056
LDC I,142
CHK J,0,285
IXA 4
LDC I,1566
LOC 1000
CHK I,0,4095
STO I
LDA 1,5056
LDC I,143
CHK J,0,285
IXA 4
LDC I,1567
CHK I,0,4095
STO I
LDA 1,5056
LOC 1010
LDC I,144
CHK J,0,285
IXA 4
LDC I,1568
CHK I,0,4095
STO I
LDA 1,5056
LDC I,145
CHK J,0,285
IXA 4
LOC 1020
LDC I,1569
CHK I,0,4095
STO I
LDA 1,5056
LDC I,146
CHK J,0,285
IXA 4
LDC I,1570
CHK I,0,4095
STO I
LOC 1030
LDA 1,5056
LDC I,147
CHK J,0,285
IXA 4
LDC I,108
CHK I,0,4095
STO I
LDA 1,5056
LDC I,148
CHK J,0,285
LOC 1040
IXA 4
LDC I,112
CHK I,0,4095
STO I
LDA 1,5056
LDC I,149
CHK J,0,285
IXA 4
LDC I,1483
CHK I,0,4095
LOC 1050
STO I
LDA 1,5056
LDC I,150
CHK J,0,285
IXA 4
LDC I,1484
CHK I,0,4095
STO I
LDA 1,5056
LDC I,151
LOC 1060
CHK J,0,285
IXA 4
LDC I,1485
CHK I,0,4095
STO I
LDA 1,5056
LDC I,152
CHK J,0,285
IXA 4
LDC I,1486
LOC 1070
CHK I,0,4095
STO I
LDA 1,5056
LDC I,153
CHK J,0,285
IXA 4
LDC I,1939
CHK I,0,4095
STO I
LDA 1,5056
LOC 1080
LDC I,154
CHK J,0,285
IXA 4
LDC I,784
CHK I,0,4095
STO I
LDA 1,5056
LDC I,155
CHK J,0,285
IXA 4
LOC 1090
LDC I,796
CHK I,0,4095
STO I
LDA 1,5056
LDC I,156
CHK J,0,285
IXA 4
LDC I,136
CHK I,0,4095
STO I
LOC 1100
LDA 1,5056
LDC I,157
CHK J,0,285
IXA 4
LDC I,152
CHK I,0,4095
STO I
LDA 1,5056
LDC I,158
CHK J,0,285
LOC 1110
IXA 4
LDC I,140
CHK I,0,4095
STO I
LDA 1,5056
LDC I,159
CHK J,0,285
IXA 4
LDC I,156
CHK I,0,4095
LOC 1120
STO I
LDA 1,5056
LDC I,160
CHK J,0,285
IXA 4
LDC I,248
CHK I,0,4095
STO I
LDA 1,5056
LDC I,161
LOC 1130
CHK J,0,285
IXA 4
LDC I,264
CHK I,0,4095
STO I
LDA 1,5056
LDC I,162
CHK J,0,285
IXA 4
LDC I,252
LOC 1140
CHK I,0,4095
STO I
LDA 1,5056
LDC I,163
CHK J,0,285
IXA 4
LDC I,268
CHK I,0,4095
STO I
LDA 1,5056
LOC 1150
LDC I,164
CHK J,0,285
IXA 4
LDC I,1698
CHK I,0,4095
STO I
LDA 1,5056
LDC I,165
CHK J,0,285
IXA 4
LOC 1160
LDC I,908
CHK I,0,4095
STO I
LDA 1,5056
LDC I,166
CHK J,0,285
IXA 4
LDC I,940
CHK I,0,4095
STO I
LOC 1170
LDA 1,5056
LDC I,167
CHK J,0,285
IXA 4
LDC I,1016
CHK I,0,4095
STO I
LDA 1,5056
LDC I,168
CHK J,0,285
LOC 1180
IXA 4
LDC I,1048
CHK I,0,4095
STO I
LDA 1,5056
LDC I,169
CHK J,0,285
IXA 4
LDC I,2112
CHK I,0,4095
LOC 1190
STO I
LDA 1,5056
LDC I,170
CHK J,0,285
IXA 4
LDC I,2304
CHK I,0,4095
STO I
LDA 1,5056
LDC I,171
LOC 1200
CHK J,0,285
IXA 4
LDC I,2176
CHK I,0,4095
STO I
LDA 1,5056
LDC I,172
CHK J,0,285
IXA 4
LDC I,2048
LOC 1210
CHK I,0,4095
STO I
LDA 1,5056
LDC I,173
CHK J,0,285
IXA 4
LDC I,2368
CHK I,0,4095
STO I
LDA 1,5056
LOC 1220
LDC I,174
CHK J,0,285
IXA 4
LDC I,2240
CHK I,0,4095
STO I
LDA 1,5056
LDC I,175
CHK J,0,285
IXA 4
LOC 1230
LDC I,2128
CHK I,0,4095
STO I
LDA 1,5056
LDC I,176
CHK J,0,285
IXA 4
LDC I,2320
CHK I,0,4095
STO I
LOC 1240
LDA 1,5056
LDC I,177
CHK J,0,285
IXA 4
LDC I,2192
CHK I,0,4095
STO I
LDA 1,5056
LDC I,178
CHK J,0,285
LOC 1250
IXA 4
LDC I,2064
CHK I,0,4095
STO I
LDA 1,5056
LDC I,179
CHK J,0,285
IXA 4
LDC I,2384
CHK I,0,4095
LOC 1260
STO I
LDA 1,5056
LDC I,180
CHK J,0,285
IXA 4
LDC I,2256
CHK I,0,4095
STO I
LDA 1,5056
LDC I,181
LOC 1270
CHK J,0,285
IXA 4
LDC I,2144
CHK I,0,4095
STO I
LDA 1,5056
LDC I,182
CHK J,0,285
IXA 4
LDC I,2336
LOC 1280
CHK I,0,4095
STO I
LDA 1,5056
LDC I,183
CHK J,0,285
IXA 4
LDC I,2208
CHK I,0,4095
STO I
LDA 1,5056
LOC 1290
LDC I,184
CHK J,0,285
IXA 4
LDC I,2080
CHK I,0,4095
STO I
LDA 1,5056
LDC I,185
CHK J,0,285
IXA 4
LOC 1300
LDC I,2400
CHK I,0,4095
STO I
LDA 1,5056
LDC I,186
CHK J,0,285
IXA 4
LDC I,2272
CHK I,0,4095
STO I
LOC 1310
LDA 1,5056
LDC I,187
CHK J,0,285
IXA 4
LDC I,2160
CHK I,0,4095
STO I
LDA 1,5056
LDC I,188
CHK J,0,285
LOC 1320
IXA 4
LDC I,2352
CHK I,0,4095
STO I
LDA 1,5056
LDC I,189
CHK J,0,285
IXA 4
LDC I,2224
CHK I,0,4095
LOC 1330
STO I
LDA 1,5056
LDC I,190
CHK J,0,285
IXA 4
LDC I,2096
CHK I,0,4095
STO I
LDA 1,5056
LDC I,191
LOC 1340
CHK J,0,285
IXA 4
LDC I,2416
CHK I,0,4095
STO I
LDA 1,5056
LDC I,192
CHK J,0,285
IXA 4
LDC I,2288
LOC 1350
CHK I,0,4095
STO I
LDA 1,5056
LDC I,193
CHK J,0,285
IXA 4
LDC I,2432
CHK I,0,4095
STO I
LDA 1,5056
LOC 1360
LDC I,194
CHK J,0,285
IXA 4
LDC I,2448
CHK I,0,4095
STO I
LDA 1,5056
LDC I,195
CHK J,0,285
IXA 4
LOC 1370
LDC I,2464
CHK I,0,4095
STO I
LDA 1,5056
LDC I,196
CHK J,0,285
IXA 4
LDC I,2480
CHK I,0,4095
STO I
LOC 1380
LDA 1,5056
LDC I,197
CHK J,0,285
IXA 4
LDC I,2624
CHK I,0,4095
STO I
LDA 1,5056
LDC I,198
CHK J,0,285
LOC 1390
IXA 4
LDC I,2640
CHK I,0,4095
STO I
LDA 1,5056
LDC I,199
CHK J,0,285
IXA 4
LDC I,2656
CHK I,0,4095
LOC 1400
STO I
LDA 1,5056
LDC I,200
CHK J,0,285
IXA 4
LDC I,2672
CHK I,0,4095
STO I
LDA 1,5056
LDC I,201
LOC 1410
CHK J,0,285
IXA 4
LDC I,1575
CHK I,0,4095
STO I
LDA 1,5056
LDC I,202
CHK J,0,285
IXA 4
LDC I,1576
LOC 1420
CHK I,0,4095
STO I
LDA 1,5056
LDC I,203
CHK J,0,285
IXA 4
LDC I,1577
CHK I,0,4095
STO I
LDA 1,5056
LOC 1430
LDC I,204
CHK J,0,285
IXA 4
LDC I,1578
CHK I,0,4095
STO I
LDA 1,5056
LDC I,205
CHK J,0,285
IXA 4
LOC 1440
LDC I,1579
CHK I,0,4095
STO I
LDA 1,5056
LDC I,206
CHK J,0,285
IXA 4
LDC I,1580
CHK I,0,4095
STO I
LOC 1450
LDA 1,5056
LDC I,207
CHK J,0,285
IXA 4
LDC I,1581
CHK I,0,4095
STO I
LDA 1,5056
LDC I,208
CHK J,0,285
LOC 1460
IXA 4
LDC I,1582
CHK I,0,4095
STO I
LDA 1,5056
LDC I,209
CHK J,0,285
IXA 4
LDC I,1583
CHK I,0,4095
LOC 1470
STO I
LDA 1,5056
LDC I,210
CHK J,0,285
IXA 4
LDC I,1584
CHK I,0,4095
STO I
LDA 1,5056
LDC I,211
LOC 1480
CHK J,0,285
IXA 4
LDC I,1585
CHK I,0,4095
STO I
LDA 1,5056
LDC I,212
CHK J,0,285
IXA 4
LDC I,1586
LOC 1490
CHK I,0,4095
STO I
LDA 1,5056
LDC I,213
CHK J,0,285
IXA 4
LDC I,1587
CHK I,0,4095
STO I
LDA 1,5056
LOC 1500
LDC I,214
CHK J,0,285
IXA 4
LDC I,1588
CHK I,0,4095
STO I
LDA 1,5056
LDC I,215
CHK J,0,285
IXA 4
LOC 1510
LDC I,1589
CHK I,0,4095
STO I
LDA 1,5056
LDC I,216
CHK J,0,285
IXA 4
LDC I,1590
CHK I,0,4095
STO I
LOC 1520
LDA 1,5056
LDC I,217
CHK J,0,285
IXA 4
LDC I,1591
CHK I,0,4095
STO I
LDA 1,5056
LDC I,218
CHK J,0,285
LOC 1530
IXA 4
LDC I,1592
CHK I,0,4095
STO I
LDA 1,5056
LDC I,219
CHK J,0,285
IXA 4
LDC I,1593
CHK I,0,4095
LOC 1540
STO I
LDA 1,5056
LDC I,220
CHK J,0,285
IXA 4
LDC I,1594
CHK I,0,4095
STO I
LDA 1,5056
LDC I,221
LOC 1550
CHK J,0,285
IXA 4
LDC I,1595
CHK I,0,4095
STO I
LDA 1,5056
LDC I,222
CHK J,0,285
IXA 4
LDC I,1596
LOC 1560
CHK I,0,4095
STO I
LDA 1,5056
LDC I,223
CHK J,0,285
IXA 4
LDC I,1597
CHK I,0,4095
STO I
LDA 1,5056
LOC 1570
LDC I,224
CHK J,0,285
IXA 4
LDC I,1598
CHK I,0,4095
STO I
LDA 1,5056
LDC I,225
CHK J,0,285
IXA 4
LOC 1580
LDC I,1599
CHK I,0,4095
STO I
LDA 1,5056
LDC I,226
CHK J,0,285
IXA 4
LDC I,1600
CHK I,0,4095
STO I
LOC 1590
LDA 1,5056
LDC I,227
CHK J,0,285
IXA 4
LDC I,1601
CHK I,0,4095
STO I
LDA 1,5056
LDC I,228
CHK J,0,285
LOC 1600
IXA 4
LDC I,1602
CHK I,0,4095
STO I
LDA 1,5056
LDC I,229
CHK J,0,285
IXA 4
LDC I,1603
CHK I,0,4095
LOC 1610
STO I
LDA 1,5056
LDC I,230
CHK J,0,285
IXA 4
LDC I,1604
CHK I,0,4095
STO I
LDA 1,5056
LDC I,231
LOC 1620
CHK J,0,285
IXA 4
LDC I,1605
CHK I,0,4095
STO I
LDA 1,5056
LDC I,232
CHK J,0,285
IXA 4
LDC I,1606
LOC 1630
CHK I,0,4095
STO I
LDA 1,5056
LDC I,233
CHK J,0,285
IXA 4
LDC I,1607
CHK I,0,4095
STO I
LDA 1,5056
LOC 1640
LDC I,234
CHK J,0,285
IXA 4
LDC I,1608
CHK I,0,4095
STO I
LDA 1,5056
LDC I,235
CHK J,0,285
IXA 4
LOC 1650
LDC I,1609
CHK I,0,4095
STO I
LDA 1,5056
LDC I,236
CHK J,0,285
IXA 4
LDC I,1610
CHK I,0,4095
STO I
LOC 1660
LDA 1,5056
LDC I,237
CHK J,0,285
IXA 4
LDC I,1611
CHK I,0,4095
STO I
LDA 1,5056
LDC I,238
CHK J,0,285
LOC 1670
IXA 4
LDC I,1612
CHK I,0,4095
STO I
LDA 1,5056
LDC I,239
CHK J,0,285
IXA 4
LDC I,1613
CHK I,0,4095
LOC 1680
STO I
LDA 1,5056
LDC I,240
CHK J,0,285
IXA 4
LDC I,1614
CHK I,0,4095
STO I
LDA 1,5056
LDC I,241
LOC 1690
CHK J,0,285
IXA 4
LDC I,1615
CHK I,0,4095
STO I
LDA 1,5056
LDC I,242
CHK J,0,285
IXA 4
LDC I,1616
LOC 1700
CHK I,0,4095
STO I
LDA 1,5056
LDC I,243
CHK J,0,285
IXA 4
LDC I,1617
CHK I,0,4095
STO I
LDA 1,5056
LOC 1710
LDC I,244
CHK J,0,285
IXA 4
LDC I,1618
CHK I,0,4095
STO I
LDA 1,5056
LDC I,245
CHK J,0,285
IXA 4
LOC 1720
LDC I,1619
CHK I,0,4095
STO I
LDA 1,5056
LDC I,246
CHK J,0,285
IXA 4
LDC I,1620
CHK I,0,4095
STO I
LOC 1730
LDA 1,5056
LDC I,247
CHK J,0,285
IXA 4
LDC I,1621
CHK I,0,4095
STO I
LDA 1,5056
LDC I,248
CHK J,0,285
LOC 1740
IXA 4
LDC I,1622
CHK I,0,4095
STO I
LDA 1,5056
LDC I,249
CHK J,0,285
IXA 4
LDC I,1623
CHK I,0,4095
LOC 1750
STO I
LDA 1,5056
LDC I,250
CHK J,0,285
IXA 4
LDC I,1624
CHK I,0,4095
STO I
LDA 1,5056
LDC I,251
LOC 1760
CHK J,0,285
IXA 4
LDC I,1625
CHK I,0,4095
STO I
LDA 1,5056
LDC I,252
CHK J,0,285
IXA 4
LDC I,1626
LOC 1770
CHK I,0,4095
STO I
LDA 1,5056
LDC I,253
CHK J,0,285
IXA 4
LDC I,1627
CHK I,0,4095
STO I
LDA 1,5056
LOC 1780
LDC I,254
CHK J,0,285
IXA 4
LDC I,1628
CHK I,0,4095
STO I
LDA 1,5056
LDC I,255
CHK J,0,285
IXA 4
LOC 1790
LDC I,1629
CHK I,0,4095
STO I
LDA 1,5056
LDC I,256
CHK J,0,285
IXA 4
LDC I,1630
CHK I,0,4095
STO I
LOC 1800
LDA 1,5056
LDC I,257
CHK J,0,285
IXA 4
LDC I,1631
CHK I,0,4095
STO I
LDA 1,5056
LDC I,258
CHK J,0,285
LOC 1810
IXA 4
LDC I,1632
CHK I,0,4095
STO I
LDA 1,5056
LDC I,259
CHK J,0,285
IXA 4
LDC I,1633
CHK I,0,4095
LOC 1820
STO I
LDA 1,5056
LDC I,260
CHK J,0,285
IXA 4
LDC I,1634
CHK I,0,4095
STO I
LDA 1,5056
LDC I,261
LOC 1830
CHK J,0,285
IXA 4
LDC I,1635
CHK I,0,4095
STO I
LDA 1,5056
LDC I,262
CHK J,0,285
IXA 4
LDC I,1636
LOC 1840
CHK I,0,4095
STO I
LDA 1,5056
LDC I,263
CHK J,0,285
IXA 4
LDC I,1637
CHK I,0,4095
STO I
LDA 1,5056
LOC 1850
LDC I,264
CHK J,0,285
IXA 4
LDC I,1638
CHK I,0,4095
STO I
LDA 1,5056
LDC I,265
CHK J,0,285
IXA 4
LOC 1860
LDC I,44
CHK I,0,4095
STO I
LDA 1,5056
LDC I,266
CHK J,0,285
IXA 4
LDC I,60
CHK I,0,4095
STO I
LOC 1870
LDA 1,5056
LDC I,267
CHK J,0,285
IXA 4
LDC I,48
CHK I,0,4095
STO I
LDA 1,5056
LDC I,268
CHK J,0,285
LOC 1880
IXA 4
LDC I,64
CHK I,0,4095
STO I
LDA 1,5056
LDC I,269
CHK J,0,285
IXA 4
LDC I,1386
CHK I,0,4095
LOC 1890
STO I
LDA 1,5056
LDC I,270
CHK J,0,285
IXA 4
LDC I,1387
CHK I,0,4095
STO I
LDA 1,5056
LDC I,271
LOC 1900
CHK J,0,285
IXA 4
LDC I,1390
CHK I,0,4095
STO I
LDA 1,5056
LDC I,272
CHK J,0,285
IXA 4
LDC I,1391
LOC 1910
CHK I,0,4095
STO I
LDA 1,5056
LDC I,273
CHK J,0,285
IXA 4
LDC I,1388
CHK I,0,4095
STO I
LDA 1,5056
LOC 1920
LDC I,274
CHK J,0,285
IXA 4
LDC I,1392
CHK I,0,4095
STO I
LDA 1,5056
LDC I,275
CHK J,0,285
IXA 4
LOC 1930
LDC I,1394
CHK I,0,4095
STO I
LDA 1,5056
LDC I,276
CHK J,0,285
IXA 4
LDC I,1395
CHK I,0,4095
STO I
LOC 1940
LDA 1,5056
LDC I,277
CHK J,0,285
IXA 4
LDC I,1396
CHK I,0,4095
STO I
LDA 1,5056
LDC I,278
CHK J,0,285
LOC 1950
IXA 4
LDC I,1389
CHK I,0,4095
STO I
LDA 1,5056
LDC I,279
CHK J,0,285
IXA 4
LDC I,1393
CHK I,0,4095
LOC 1960
STO I
LDA 1,5056
LDC I,280
CHK J,0,285
IXA 4
LDC I,1397
CHK I,0,4095
STO I
LDA 1,5056
LDC I,281
LOC 1970
CHK J,0,285
IXA 4
LDC I,1398
CHK I,0,4095
STO I
LDA 1,5056
LDC I,282
CHK J,0,285
IXA 4
LDC I,1399
LOC 1980
CHK I,0,4095
STO I
LDA 1,5056
LDC I,283
CHK J,0,285
IXA 4
LDC I,1400
CHK I,0,4095
STO I
LDA 1,5056
LOC 1990
LDC I,284
CHK J,0,285
IXA 4
LDC I,1401
CHK I,0,4095
STO I
LDA 1,5056
LDC I,285
CHK J,0,285
IXA 4
LOC 2000
LDC I,864
CHK I,0,4095
STO I
RET P
L1 DEF 8
SST P INIT6234 3 0 0 0 0
LOC 0
INIT6234 ENT P,3,L1 INIT6 1 1 1
LDA 1,30596
LDC I,169
CHK J,169,200
DEC I,169
IXA 4
LDC I,170
CHK I,169,200
STO I
LDA 1,30596
LOC 10
LDC I,170
CHK J,169,200
DEC I,169
IXA 4
LDC I,169
CHK I,169,200
STO I
LDA 1,30596
LDC I,171
CHK J,169,200
LOC 20
DEC I,169
IXA 4
LDC I,174
CHK I,169,200
STO I
LDA 1,30596
LDC I,174
CHK J,169,200
DEC I,169
IXA 4
LOC 30
LDC I,171
CHK I,169,200
STO I
LDA 1,30596
LDC I,172
CHK J,169,200
DEC I,169
IXA 4
LDC I,173
CHK I,169,200
LOC 40
STO I
LDA 1,30596
LDC I,173
CHK J,169,200
DEC I,169
IXA 4
LDC I,172
CHK I,169,200
STO I
LDA 1,30596
LOC 50
LDC I,175
CHK J,169,200
DEC I,169
IXA 4
LDC I,176
CHK I,169,200
STO I
LDA 1,30596
LDC I,176
CHK J,169,200
LOC 60
DEC I,169
IXA 4
LDC I,175
CHK I,169,200
STO I
LDA 1,30596
LDC I,177
CHK J,169,200
DEC I,169
IXA 4
LOC 70
LDC I,180
CHK I,169,200
STO I
LDA 1,30596
LDC I,180
CHK J,169,200
DEC I,169
IXA 4
LDC I,177
CHK I,169,200
LOC 80
STO I
LDA 1,30596
LDC I,178
CHK J,169,200
DEC I,169
IXA 4
LDC I,179
CHK I,169,200
STO I
LDA 1,30596
LOC 90
LDC I,179
CHK J,169,200
DEC I,169
IXA 4
LDC I,178
CHK I,169,200
STO I
LDA 1,30596
LDC I,181
CHK J,169,200
LOC 100
DEC I,169
IXA 4
LDC I,182
CHK I,169,200
STO I
LDA 1,30596
LDC I,182
CHK J,169,200
DEC I,169
IXA 4
LOC 110
LDC I,181
CHK I,169,200
STO I
LDA 1,30596
LDC I,183
CHK J,169,200
DEC I,169
IXA 4
LDC I,186
CHK I,169,200
LOC 120
STO I
LDA 1,30596
LDC I,186
CHK J,169,200
DEC I,169
IXA 4
LDC I,183
CHK I,169,200
STO I
LDA 1,30596
LOC 130
LDC I,184
CHK J,169,200
DEC I,169
IXA 4
LDC I,185
CHK I,169,200
STO I
LDA 1,30596
LDC I,185
CHK J,169,200
LOC 140
DEC I,169
IXA 4
LDC I,184
CHK I,169,200
STO I
LDA 1,30596
LDC I,187
CHK J,169,200
DEC I,169
IXA 4
LOC 150
LDC I,188
CHK I,169,200
STO I
LDA 1,30596
LDC I,188
CHK J,169,200
DEC I,169
IXA 4
LDC I,187
CHK I,169,200
LOC 160
STO I
LDA 1,30596
LDC I,189
CHK J,169,200
DEC I,169
IXA 4
LDC I,192
CHK I,169,200
STO I
LDA 1,30596
LOC 170
LDC I,192
CHK J,169,200
DEC I,169
IXA 4
LDC I,189
CHK I,169,200
STO I
LDA 1,30596
LDC I,190
CHK J,169,200
LOC 180
DEC I,169
IXA 4
LDC I,191
CHK I,169,200
STO I
LDA 1,30596
LDC I,191
CHK J,169,200
DEC I,169
IXA 4
LOC 190
LDC I,190
CHK I,169,200
STO I
LDA 1,30596
LDC I,193
CHK J,169,200
DEC I,169
IXA 4
LDC I,197
CHK I,169,200
LOC 200
STO I
LDA 1,30596
LDC I,194
CHK J,169,200
DEC I,169
IXA 4
LDC I,198
CHK I,169,200
STO I
LDA 1,30596
LOC 210
LDC I,195
CHK J,169,200
DEC I,169
IXA 4
LDC I,199
CHK I,169,200
STO I
LDA 1,30596
LDC I,196
CHK J,169,200
LOC 220
DEC I,169
IXA 4
LDC I,200
CHK I,169,200
STO I
LDA 1,30596
LDC I,197
CHK J,169,200
DEC I,169
IXA 4
LOC 230
LDC I,193
CHK I,169,200
STO I
LDA 1,30596
LDC I,198
CHK J,169,200
DEC I,169
IXA 4
LDC I,194
CHK I,169,200
LOC 240
STO I
LDA 1,30596
LDC I,199
CHK J,169,200
DEC I,169
IXA 4
LDC I,195
CHK I,169,200
STO I
LDA 1,30596
LOC 250
LDC I,200
CHK J,169,200
DEC I,169
IXA 4
LDC I,196
CHK I,169,200
STO I
LOD I,1,4332
CHK I,0,285
STR I,2,28
LOC 260
LOD I,1,4328
CHK I,0,285
ORD
STR I,3,8
LOD I,2,28
ORD
LOD I,3,8
LEQ I
FJP L3
L2 LAB
LDA 1,23728
LOC 270
LOD I,2,28
CHK J,0,285
IXA 4
IND I,0
ORD
CHK I,0,4
XJP L4
L8 LAB
LDC I,1
STR I,2,8
UJP L7
L9 LAB
LOC 280
LDA 1,4864
LDC I,2
CHK J,0,34
IXA 4
IND I,0
STR I,2,8
UJP L7
L10 LAB
LDA 1,4864
LDC I,1
CHK J,0,34
LOC 290
IXA 4
IND I,0
STR I,2,8
UJP L7
L11 LAB
LDA 1,4864
LDC I,4
CHK J,0,34
IXA 4
IND I,0
STR I,2,8
LOC 300
UJP L7
L4 DEF 0
L5 DEF 4
L6 LAB
UJP L8
UJP L9
UJP L10
UJP L8
UJP L11
L7 LAB
LDA 1,5056
LOD I,2,28
CHK J,0,285
IXA 4
LOC 310
IND I,0
LOD I,2,8
MOD
LDC I,0
EQU I
NOT
FJP L13
MST 2,4,4
LCA 'INITIALIZ001'
PAR A
LOC 320
CUP P,2,ASSER003
L13 LAB
LDA 1,5056
LOD I,2,28
CHK J,0,285
IXA 4
IND I,0
STR I,2,12
LDA 1,5056
LOD I,2,28
CHK J,0,285
LOC 330
IXA 4
IND I,0
LOD I,2,8
ADI
LDC I,1
SBI
STR I,3,12
LOD I,2,12
LOD I,3,12
LEQ I
LOC 340
FJP L15
L14 LAB
LDA 1,6200
LOD I,2,12
CHK J,0,4095
IXA 4
LOD I,2,28
CHK I,0,285
STO I
LOD I,2,12
LOD I,3,12
LOC 350
NEQ I
FJP L15
LOD I,2,12
INC I,1
STR I,2,12
UJP L14
L15 LAB
LOD I,2,28
ORD
LOD I,3,8
NEQ I
LOC 360
FJP L3
LOD I,2,28
INC I,1
CHK I,0,285
STR I,2,28
UJP L2
L3 LAB
LOD I,1,4332
CHK I,0,285
STR I,2,28
LOD I,1,4328
LOC 370
CHK I,0,285
ORD
STR I,3,8
LOD I,2,28
ORD
LOD I,3,8
LEQ I
FJP L17
L16 LAB
LDA 1,40368
LOD I,2,28
LOC 380
CHK J,0,285
IXA 4
LDC I,0
STO I
LOD I,2,28
ORD
LOD I,3,8
NEQ I
FJP L17
LOD I,2,28
LOC 390
INC I,1
CHK I,0,285
STR I,2,28
UJP L16
L17 LAB
LDC I,0
STR I,1,41520
LDC I,0
STR I,1,41528
LDC I,0
STR I,1,41532
LOC 400
LDC I,0
STR I,1,41536
LDC I,0
STR I,1,41540
LDC I,0
STR I,1,41544
LDC B,0
STR B,1,285
LDC B,0
STR B,1,284
LOC 410
LDC B,0
STR B,1,282
LDC B,0
STR B,1,281
LDC B,0
STR B,1,280
LDC B,0
STR B,1,283
LDA 1,316
LDA 1,4724
LOC 420
MOV 12
LDC N
CHK A,-1,0
STR A,1,328
LDC I,1
LDC I,1
SBI
CHK I,-1,30
STR I,1,39472
LDC I,0
LOC 430
CHK I,0,15
STR I,1,39924
LDC B,0
STR B,1,305
LDC B,0
STR B,1,304
LDC I,0
CHK I,0,34359738367
STR I,1,40364
LDC I,0
LOC 440
CHK I,0,8
STR I,1,5028
RET P
L1 DEF 16
SST P INIT7235 3 0 0 4 0
LOC 0
INIT7235 ENT P,3,L1 INIT7 1 1 1
LOD I,1,4332
CHK I,0,285
STR I,3,8
LOD I,1,4328
CHK I,0,285
ORD
STR I,3,12
LOD I,3,8
ORD
LOC 10
LOD I,3,12
LEQ I
FJP L3
L2 LAB
LDA 1,30308
LOD I,3,8
CHK J,0,285
IXA 1
LDC B,0
STO B
LOD I,3,8
LOC 20
ORD
LOD I,3,12
NEQ I
FJP L3
LOD I,3,8
INC I,1
CHK I,0,285
STR I,3,8
UJP L2
L3 LAB
LDA 1,30308
LOC 30
LDC I,4
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,5
CHK J,0,285
IXA 1
LDC B,1
LOC 40
STO B
LDA 1,30308
LDC I,6
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,7
CHK J,0,285
LOC 50
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,8
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 60
LDC I,9
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,13
CHK J,0,285
IXA 1
LDC B,1
LOC 70
STO B
LDA 1,30308
LDC I,14
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,15
CHK J,0,285
LOC 80
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,16
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 90
LDC I,40
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,41
CHK J,0,285
IXA 1
LDC B,1
LOC 100
STO B
LDA 1,30308
LDC I,42
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,43
CHK J,0,285
LOC 110
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,44
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 120
LDC I,45
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,46
CHK J,0,285
IXA 1
LDC B,1
LOC 130
STO B
LDA 1,30308
LDC I,47
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,48
CHK J,0,285
LOC 140
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,49
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 150
LDC I,50
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,51
CHK J,0,285
IXA 1
LDC B,1
LOC 160
STO B
LDA 1,30308
LDC I,52
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,53
CHK J,0,285
LOC 170
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,54
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 180
LDC I,55
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,56
CHK J,0,285
IXA 1
LDC B,1
LOC 190
STO B
LDA 1,30308
LDC I,57
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,58
CHK J,0,285
LOC 200
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,59
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 210
LDC I,60
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,62
CHK J,0,285
IXA 1
LDC B,1
LOC 220
STO B
LDA 1,30308
LDC I,66
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,67
CHK J,0,285
LOC 230
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,68
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 240
LDC I,69
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,70
CHK J,0,285
IXA 1
LDC B,1
LOC 250
STO B
LDA 1,30308
LDC I,71
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,72
CHK J,0,285
LOC 260
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,73
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 270
LDC I,74
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,75
CHK J,0,285
IXA 1
LDC B,1
LOC 280
STO B
LDA 1,30308
LDC I,76
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,77
CHK J,0,285
LOC 290
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,78
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 300
LDC I,79
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,80
CHK J,0,285
IXA 1
LDC B,1
LOC 310
STO B
LDA 1,30308
LDC I,81
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,82
CHK J,0,285
LOC 320
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,147
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 330
LDC I,148
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,149
CHK J,0,285
IXA 1
LDC B,1
LOC 340
STO B
LDA 1,30308
LDC I,150
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,151
CHK J,0,285
LOC 350
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,152
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 360
LDC I,154
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,155
CHK J,0,285
IXA 1
LDC B,1
LOC 370
STO B
LDA 1,30308
LDC I,156
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,157
CHK J,0,285
LOC 380
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,158
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 390
LDC I,159
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,160
CHK J,0,285
IXA 1
LDC B,1
LOC 400
STO B
LDA 1,30308
LDC I,161
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,162
CHK J,0,285
LOC 410
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,163
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 420
LDC I,165
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,166
CHK J,0,285
IXA 1
LDC B,1
LOC 430
STO B
LDA 1,30308
LDC I,167
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,168
CHK J,0,285
LOC 440
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,265
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 450
LDC I,266
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,267
CHK J,0,285
IXA 1
LDC B,1
LOC 460
STO B
LDA 1,30308
LDC I,268
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,269
CHK J,0,285
LOC 470
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,270
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 480
LDC I,271
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,272
CHK J,0,285
IXA 1
LDC B,1
LOC 490
STO B
LDA 1,30308
LDC I,273
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,274
CHK J,0,285
LOC 500
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,275
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 510
LDC I,276
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,277
CHK J,0,285
IXA 1
LDC B,1
LOC 520
STO B
LDA 1,30308
LDC I,278
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,279
CHK J,0,285
LOC 530
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,280
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LOC 540
LDC I,281
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,282
CHK J,0,285
IXA 1
LDC B,1
LOC 550
STO B
LDA 1,30308
LDC I,283
CHK J,0,285
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,284
CHK J,0,285
LOC 560
IXA 1
LDC B,1
STO B
LDA 1,30308
LDC I,285
CHK J,0,285
IXA 1
LDC B,1
STO B
LOD I,1,4332
LOC 570
CHK I,0,285
STR I,3,8
LOD I,1,4328
CHK I,0,285
ORD
STR I,3,12
LOD I,3,8
ORD
LOD I,3,12
LEQ I
LOC 580
FJP L5
L4 LAB
LDA 1,29164
LOD I,3,8
CHK J,0,285
IXA 4
LDC I,0
CHK I,0,4
STO I
LOD I,3,8
ORD
LOC 590
LOD I,3,12
NEQ I
FJP L5
LOD I,3,8
INC I,1
CHK I,0,285
STR I,3,8
UJP L4
L5 LAB
LDA 1,29164
LDC I,4
LOC 600
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,5
CHK J,0,285
IXA 4
LDC I,2
LOC 610
CHK I,0,4
STO I
LDA 1,29164
LDC I,6
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LOC 620
LDC I,7
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,8
CHK J,0,285
IXA 4
LOC 630
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,9
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 640
LDA 1,29164
LDC I,13
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,14
CHK J,0,285
LOC 650
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,15
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 660
STO I
LDA 1,29164
LDC I,16
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,40
LOC 670
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,41
CHK J,0,285
IXA 4
LDC I,3
LOC 680
CHK I,0,4
STO I
LDA 1,29164
LDC I,42
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LOC 690
LDC I,43
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,44
CHK J,0,285
IXA 4
LOC 700
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,45
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 710
LDA 1,29164
LDC I,46
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,47
CHK J,0,285
LOC 720
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,48
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 730
STO I
LDA 1,29164
LDC I,49
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,50
LOC 740
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,51
CHK J,0,285
IXA 4
LDC I,4
LOC 750
CHK I,0,4
STO I
LDA 1,29164
LDC I,52
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LOC 760
LDC I,53
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,54
CHK J,0,285
IXA 4
LOC 770
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,55
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LOC 780
LDA 1,29164
LDC I,56
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,57
CHK J,0,285
LOC 790
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,58
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 800
STO I
LDA 1,29164
LDC I,59
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,60
LOC 810
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,62
CHK J,0,285
IXA 4
LDC I,3
LOC 820
CHK I,0,4
STO I
LDA 1,29164
LDC I,66
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LOC 830
LDC I,67
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,68
CHK J,0,285
IXA 4
LOC 840
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,69
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LOC 850
LDA 1,29164
LDC I,70
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,29164
LDC I,71
CHK J,0,285
LOC 860
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,72
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
LOC 870
STO I
LDA 1,29164
LDC I,73
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,74
LOC 880
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,75
CHK J,0,285
IXA 4
LDC I,3
LOC 890
CHK I,0,4
STO I
LDA 1,29164
LDC I,76
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LOC 900
LDC I,77
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,29164
LDC I,78
CHK J,0,285
IXA 4
LOC 910
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,79
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 920
LDA 1,29164
LDC I,80
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,81
CHK J,0,285
LOC 930
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,82
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 940
STO I
LDA 1,29164
LDC I,147
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,148
LOC 950
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,149
CHK J,0,285
IXA 4
LDC I,1
LOC 960
CHK I,0,4
STO I
LDA 1,29164
LDC I,150
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,29164
LOC 970
LDC I,151
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,152
CHK J,0,285
IXA 4
LOC 980
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,154
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LOC 990
LDA 1,29164
LDC I,155
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,156
CHK J,0,285
LOC 1000
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,157
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1010
STO I
LDA 1,29164
LDC I,158
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,159
LOC 1020
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,160
CHK J,0,285
IXA 4
LDC I,3
LOC 1030
CHK I,0,4
STO I
LDA 1,29164
LDC I,161
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LOC 1040
LDC I,162
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,163
CHK J,0,285
IXA 4
LOC 1050
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,165
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 1060
LDA 1,29164
LDC I,166
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,167
CHK J,0,285
LOC 1070
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,168
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
LOC 1080
STO I
LDA 1,29164
LDC I,265
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,266
LOC 1090
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,267
CHK J,0,285
IXA 4
LDC I,4
LOC 1100
CHK I,0,4
STO I
LDA 1,29164
LDC I,268
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LOC 1110
LDC I,269
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,270
CHK J,0,285
IXA 4
LOC 1120
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,271
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LOC 1130
LDA 1,29164
LDC I,272
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,29164
LDC I,273
CHK J,0,285
LOC 1140
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LDC I,274
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
LOC 1150
STO I
LDA 1,29164
LDC I,275
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,276
LOC 1160
CHK J,0,285
IXA 4
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,277
CHK J,0,285
IXA 4
LDC I,3
LOC 1170
CHK I,0,4
STO I
LDA 1,29164
LDC I,278
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
LDA 1,29164
LOC 1180
LDC I,279
CHK J,0,285
IXA 4
LDC I,2
CHK I,0,4
STO I
LDA 1,29164
LDC I,280
CHK J,0,285
IXA 4
LOC 1190
LDC I,3
CHK I,0,4
STO I
LDA 1,29164
LDC I,281
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LOC 1200
LDA 1,29164
LDC I,282
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,283
CHK J,0,285
LOC 1210
IXA 4
LDC I,4
CHK I,0,4
STO I
LDA 1,29164
LDC I,284
CHK J,0,285
IXA 4
LDC I,4
CHK I,0,4
LOC 1220
STO I
LDA 1,29164
LDC I,285
CHK J,0,285
IXA 4
LDC I,1
CHK I,0,4
STO I
RET P
L1 DEF 16
LOC 0
INITI226 ENT P,2,L1 INITIALIZE 1 1 1
MST 3,0,0
CUP P,0,INIT1229
MST 3,0,0
CUP P,0,INIT2230
MST 3,0,0
CUP P,0,INIT3231
MST 3,0,0
CUP P,0,INIT4232
MST 3,0,0
LOC 10
CUP P,0,INIT5233
MST 3,0,0
CUP P,0,INIT6234
MST 3,0,0
CUP P,0,INIT7235
RET P
L1 DEF 32
LOC 0
$MAINBLK ENT P,1,L3 $MAINBLK 1 1 1
LDA 1,15
CSP SIO
CSP REW
CSP EIO
LDA 1,13
CSP SIO
CSP REW
CSP EIO
LDA 1,12
LOC 10
CSP SIO
CSP RES
CSP EIO
LDC I,0
STR I,1,308
MST 2,0,0
CUP P,0,INITI226
LDC I,1
CSP CLK
STR I,1,40360
L4 LAB
LOC 20
LOD A,1,328
CHK A,-1,0
STR A,1,288
LOD I,1,39472
CHK I,-1,30
STR I,1,292
LOD I,1,39924
CHK I,0,15
STR I,1,296
MST 2,0,0
LOC 30
CUP P,0,READN220
LOD B,1,285
FJP L5
MST 2,0,0
CUP P,0,PRINT015
L5 LAB
MST 2,0,0
CUP P,0,ASMNX209
LOD B,1,284
LOD A,1,288
LOD A,1,328
LOC 40
NEQ A
AND
FJP L6
LDA 1,13
CSP SIO
LCA ' INSTRUCTION(S) EMITTED:'
LDC I,29
LDC I,29
CSP WRS
CSP WLN
LOC 50
CSP EIO
LOD A,1,288
LDC N
EQU A
FJP L7
LOD A,1,324
CHK A,-1,0
STR A,1,288
L7 LAB
L8 LAB
LOD A,1,288
LDC N
LOC 60
NEQ A
FJP L9
LDC I,0
STR I,1,300
MST 2,8,8
LDA 1,300
PAR A
LOD A,1,288
CHK A,-1,0
PAR A
LOC 70
CUP P,4,DISAS007
MST 2,4,4
LOD A,1,288
CHK A,-1,0
PAR A
CUP A,2,NEXT$043
CHK A,-1,0
STR A,1,288
UJP L8
L9 LAB
L6 LAB
LOD B,1,282
LOC 80
FJP L10
LOD I,1,292
LOD I,1,39472
LES I
FJP L11
LDA 1,13
CSP SIO
LCA ' STACK PUSHED. NEW TOP IS '
LDC I,31
LDC I,31
LOC 90
CSP WRS
LOD I,1,39472
MST 2,4,4
LOD I,1,39472
PAR I
CUP I,2,FLDW0001
CSP WRI
CSP WLN
CSP EIO
UJP L12
L11 LAB
LOC 100
LOD I,1,292
LOD I,1,39472
GRT I
FJP L13
LDA 1,13
CSP SIO
LCA ' STACK POPPED. NEW TOP IS '
LDC I,32
LDC I,32
CSP WRS
LOC 110
LOD I,1,39472
MST 2,4,4
LOD I,1,39472
PAR I
CUP I,2,FLDW0001
CSP WRI
CSP WLN
CSP EIO
UJP L14
L13 LAB
LOD I,1,39472
LOC 120
LDC I,1
GEQ I
FJP L15
LDA 1,13
CSP SIO
LCA ' STACK TOP IS '
LDC I,19
LDC I,19
CSP WRS
CSP WLN
LOC 130
CSP EIO
UJP L16
L15 LAB
LDA 1,13
CSP SIO
LCA ' STACK IS EMPTY.'
LDC I,21
LDC I,21
CSP WRS
CSP WLN
CSP EIO
L16 LAB
L14 LAB
L12 LAB
LOC 140
LOD I,1,39472
LDC I,1
GEQ I
FJP L17
MST 2,4,4
LOD I,1,39472
CHK I,-1,30
PAR I
CUP P,2,PRINT012
L17 LAB
L10 LAB
LOD B,1,281
LOC 150
LOD I,1,39924
LOD I,1,296
NEQ I
AND
FJP L18
LOD I,1,296
LOD I,1,39924
LES I
FJP L19
LDA 1,13
LOC 160
CSP SIO
LCA ' MST STACK PUSHED. NEW TOP IS '
LDC I,30
LDC I,30
CSP WRS
LOD I,1,39924
MST 2,4,4
LOD I,1,39924
PAR I
CUP I,2,FLDW0001
LOC 170
CSP WRI
CSP WLN
CSP EIO
UJP L20
L19 LAB
LOD I,1,296
LOD I,1,39924
GRT I
FJP L21
LDA 1,13
CSP SIO
LOC 180
LCA ' MST STACK POPPED. NEW TOP IS '
LDC I,31
LDC I,31
CSP WRS
LOD I,1,39924
MST 2,4,4
LOD I,1,39924
PAR I
CUP I,2,FLDW0001
CSP WRI
LOC 190
CSP WLN
CSP EIO
L21 LAB
L20 LAB
MST 2,4,4
LOD I,1,39924
PAR I
CUP P,2,PRINT014
L18 LAB
LOD I,1,44
LDC I,54
EQU I
FJP L4
LOC 200
LDA 1,13
CSP SIO
LCA '************************** ;START OF STATISTICS'
LDC I,48
LDC I,48
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LOC 210
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LCA ' PEEPHOLE OPTIMIZER STATISTICS:'
LDC I,31
LDC I,31
CSP WRS
CSP WLN
CSP EIO
LOC 220
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
LOD I,1,41536
LOC 230
LDC I,7
CSP WRI
LCA ' JMPAS CHAINED'
LDC I,14
LDC I,14
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LOC 240
LDC C,' '
LDC I,1
CSP WRC
LOD I,1,41540
LDC I,7
CSP WRI
LCA ' JMPAS REMOVED FROM SKIPS'
LDC I,25
LDC I,25
CSP WRS
LOC 250
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
LOD I,1,41544
LDC I,7
CSP WRI
LOC 260
LCA ' MOVS COLLAPSED'
LDC I,15
LDC I,15
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LOC 270
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
LOD I,1,41532
LDC I,7
CSP WRI
LCA ' TOTAL WORDS REMOVED'
LDC I,20
LOC 280
LDC I,20
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LOC 290
LCA ' INSTRUCTION COUNTS:'
LDC I,20
LDC I,20
CSP WRS
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LOC 300
LDC I,0
STR I,1,41512
LOD I,1,4332
CHK I,0,285
STR I,1,41516
LOD I,1,4328
CHK I,0,285
ORD
STR I,1,41548
LOD I,1,41516
LOC 310
ORD
LOD I,1,41548
LEQ I
FJP L23
L22 LAB
LDA 1,23728
LOD I,1,41516
CHK J,0,285
IXA 4
IND I,0
LDC I,0
LOC 320
NEQ I
FJP L24
LOD I,1,41512
LDA 1,40368
LOD I,1,41516
CHK J,0,285
IXA 4
IND I,0
ADI
STR I,1,41512
LOC 330
LDA 1,40368
LOD I,1,41516
CHK J,0,285
IXA 4
IND I,0
LDC I,0
NEQ I
FJP L25
LDA 1,13
CSP SIO
LOC 340
LDC C,' '
LDC I,1
CSP WRC
LDA 1,40368
LOD I,1,41516
CHK J,0,285
IXA 4
IND I,0
LDC I,7
CSP WRI
LOC 350
LDC C,' '
LDC I,1
CSP WRC
LDA 1,24872
LOD I,1,41516
CHK J,0,285
IXA 15
LDC I,15
LDC I,15
CSP WRS
LOC 360
CSP WLN
CSP EIO
L25 LAB
L24 LAB
LOD I,1,41516
ORD
LOD I,1,41548
NEQ I
FJP L23
LOD I,1,41516
INC I,1
CHK I,0,285
LOC 370
STR I,1,41516
UJP L22
L23 LAB
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
LOC 380
CSP WRC
LOD I,1,41512
LDC I,7
CSP WRI
LCA ' TOTAL INSTRUCTIONS'
LDC I,19
LDC I,19
CSP WRS
CSP WLN
CSP EIO
LOC 390
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
CSP SIO
LDC C,' '
LDC I,1
CSP WRC
LOD I,1,41520
LOC 400
LDC I,7
CSP WRI
LCA ' TXT WORDS OUTPUT TO LOADER FILE'
LDC I,32
LDC I,32
CSP WRS
CSP WLN
CSP EIO
LDC I,1
CSP CLK
LOC 410
LOD I,1,40360
SBI
LDC I,10
DVI
STR I,1,40360
LDA 1,13
CSP SIO
CSP WLN
CSP EIO
LDA 1,13
LOC 420
CSP SIO
LCA ' ****'
LDC I,14
LDC I,5
CSP WRS
CSP EIO
LOD I,1,40364
LDC I,0
GRT I
FJP L26
LOC 430
LDA 1,13
CSP SIO
LOD I,1,40364
LDC I,5
CSP WRI
CSP EIO
UJP L27
L26 LAB
LDA 1,13
CSP SIO
LCA 'NO'
LOC 440
LDC I,5
LDC I,2
CSP WRS
CSP EIO
L27 LAB
LDA 1,13
CSP SIO
LCA ' ASSEMBLY ERROR(S) DETECTED,'
LDC I,28
LDC I,28
CSP WRS
LOC 450
LOD I,1,40360
LDC I,100
DVI
LDC I,3
CSP WRI
LDC C,'.'
LDC I,1
CSP WRC
LOD I,1,40360
LDC I,100
LOC 460
MOD
LDC I,2
CSP WRI
LCA ' SECONDS IN P-CODE ASSEMBLY.'
LDC I,28
LDC I,28
CSP WRS
CSP WLN
CSP EIO
LOD I,1,40364
LOC 470
LDC I,0
NEQ I
FJP L28
MST 2,4,4
LOD I,1,40364
PAR I
CUP P,2,ERREX002
L28 LAB
RET P
L3 DEF 41552
STP